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COMPENSATION SYSTEM AND METHOD 
FOR SOUND REPRODUCTION 

RELATED APPLICATION 
This application claims the benefit of co-pending provisional application serial 
5 no. 60/148,412 filed August 11, 1999. 

BACKGROUND OF THE INVENTION 
Field of the Invention : 

This invention relates generally to a compensation method and system for use 
in sonic transmission and reproduction systems and more particularly to a 
10 compensation method and system that uses parametric values to control or adjust 
processes having transforms or models with properties or responses like the 
components or elements used in the transmission or reproduction system. 

Description of Related Art : 

15 Most audio reproduction systems use electromechanical loudspealcers to 

acoustically reproduce audio signals. The electrical, mechanical, and acoustical 
properties of the loudspeakers are often less than ideal, causing distortions, response 
anomalies, and other coloration of the sound. Many techniques are used to 
compensate for the loudspeaker's characteristics in order to improve perceived audio 

20 quality. 

Functional or behavioral models of loudspeakers are used in practice and found 
in literature to develop such compensations. A good example of models and how the 
modeling process works is described in "Active Equalization of Loudspeakers", 
Speaker Builder, February 1997. Models consolidate technical languages and are 

25 usually intended to imitate or simulate the acoustic responses of the speaker system 
from electrical stimulus. Model creation or synthesis frequently begins by making 
functional groupings of elements which collectively represent or behave like all or part 
of the speaker. Coil and magnet parts become motors, which are represented by 
resistors, inductors, capacitors, back EMF generators and other transformed parts. A 

3 0 combination of factors such as air volume, moving mass, acoustic loading, magnetic- 
braking, and mechanical losses might be analyzed and simplified to LCR resonator 
networks or circuits. Most often, the transformed electromechanical, acoustic, and 
mechanical representations expressed in the model are further simplified or reduced 
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to fewer elements. The model still responds like the speaker, but the parts making the 
model no longer have exact behavioral equivalence to the parts making the speaker. 
Consequently, traditional models are neither intended, nor capable of making 
parametrically addressed zero-phase compensations when speaker parts are changed. 

One could characterize and invert the frequency response, as well as other 
properties, of a well-conceived model and achieve linear-phase correction of the 
loudspeaker. The technique does work to a fashion, but its dedicated, inflexible 
circuitry or speciahzed process tied to the traditional model hmits its use to a one- 
speaker design. Some high-quaUty crossover networks constructed to divide the 
signal spectrum amongst muhiple drivers may have some conjugate response 
correction like this. 

A low-frequency resonant boost is intentionally designed for most speakers. 
Frequently, traditional models are made to represent quantifiable and predictable 
acoustic behavior as well as other speaker design factors affecting bass response. 
Mechanical construction and properties of air determine frequency, resonant losses 
and the configuration's effect on acoustic output from the speaker. A good 
approximation to a zero-phase conjugate or same-order correction for a wider 
frequency range can be designed and implemented in this manner. Several 
components are needed to match the resonant behavior, but all interact with each other 
when adjustments are made for a different speaker of similar concept and design. 
Therefore, the operation is not strictly parametrically controlled, as the adjustments 
must be re-calculated from the model to create the minimum-phase or exact match 
needed for best fidelity with the new speaker. When more corrections are added the 
interaction problem becomes formidable. The system must be tuned experimentally 
or the model analyzed each time an adjustment is made. Consequently, lumped model 
processes for response flattening are inherently designed for a specific spealcer. The 
process must be redesigned for other speakers. 

Traditional curve-fitting methods can require hundreds of data points and 
corresponding adjustments to set up and many components or much processing power 
to match the acquired frequency response. Analog methods are impractical and digital 
processes require much computation and extensive architectures to do this. Neither 
can provide phase accurate responses or the hidden corrections described later without 
having knowledge of die speaker and its operation. Without a model, the effort to 
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combine amplitude, time and phase corrections together from measured responses 
becomes formidable. 

Some of the most important behaviors of loudspeakers (with respect to 
acoustically perceptible effect) cannot be modeled or implemented from traditional 
methods. Such behaviors include standing wave interference, modal breakup, aad 
coupled resonance as well as nonlinear consequences from such potentially interacting 
acoustic and mechamcal behaviors. Coimterproductive random motion or breakup 
may occur. Even when the average response remains flat or is the same as other 
frequencies being reproduced, energy can build up during signal stimulus and be 
released when the signal changes or ceases. In addition, other spatial factors related 
to stiffness of moving parts and high frequency de-coupling for motions away from 
a driving voice coil need to be considered. Any of these can create soxirce movements, 
delayed energy release, and phase error to binaural hearing. Often, such destructive 
responses can be invisible or very difficult to interpret from traditional microphone- 
and-spectrum-analyzer calibration methods. 

For example, unwanted responses arising from nodal and standing wave 
behavior affect the setthng time, directional behavior, and radiated output of a speaker. 
Frequently, these responses cause perceptual changes to intelligence signals yet may 
not be visible or recognizable from response plots. Mechanical motions having large 
stored energy can be out of phase at different parts of the transducer. The acoustic 
output might appear to be flat, but human binaural hearing can localize the behavior 
to its source and the altered perception can degrade stereo imaging. 

Often, mechanical disturbances are audible yet invisible or hard to interpret 
from response measurements made using a frequency sweep and microphone. Parts 
of a radiating surface can vibrate with different phase relationships to other parts, so 
that their additive acoustic output is low compared to motions within the transducer 
and the energy storage involved. When signals at the node frequency change and 
suddenly stop the release of stored energy can interact with other signals at different 
frequencies. The resulting beat sounds between the two frequencies can be audible 
and very objectionable. Sounds with spectra in the interference frequency range may 
appear louder and granular. Human binaural hearing can localize the disturbance to 
the driver or surfaces from which directional lobes might bounce, thereby imparting 
frtrther damage to the stage illusion from multi-speaker stereo reproduction. For this 
situation, frequencies creating the mechanical disturbance must be sufficiently 
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attenuated to prevent immasked reproduction of consequential responses. Experience 
has shown that a sharp, deep notch needed to do this removes enough energy around 
the correction frequencies to cause a nasal sound. If this inappropriate correction is 
modified to achieve flat response, then the mechanical sounds remain along with a 
5 potential undesirable balance aberration. 

Many small loudspeakers are constructed with a transducer, enclosure, and 
some resonant means to extend bass response such- as a port or passive radiator. 
Usually, these parts are designed to achieve a practical and economical compromise 
between efficiency, frequency response accuracy, bass extension, and acceptable 
10 distortion. Designers of inexpensive, low-powered systems generally opt for higher 
efficiency to reduce amplifier requirements along with related costs of power supplies 
and packaging. The compromise situation exposes many undesirable behavioral 
aspects. 

Most traditional speaker correction methods apply some variation of amplitude 
1 5 equalization to flatten and extend response from speakers. Adjustments are sometimes 
done by ear. To be quantitative, one must acquire relevant data. The most common 
techniques to do this use spectral analysis from noise stimulus. Then, response plots 
or displays indicate how an equalizer is to be adjusted. More sophisticated techniques 
based on delayed acceptance or sampled windows can measure first-arrival responses 
20 from the speaker and remove higher-frequency room disturbance to create anechoic- 
like data. The intent is to capture information relevant either to a listener in a room 
or to standard measurement practice where a test microphone is usually specified and 
placed one meter from the speaker. Such technique creates a response that may sound 
balanced to the single-point test microphone. One or more known systems go slightly 
25 beyond this by adjusting path lengths, or time delays to align multiple speakers to a 
listening position. 

Other techniques provide transient response waveforms, waterfall or 
successions of spectral plots after an event. Group delay and time-related information 
is acquired. Such data needs interpretation and has limited use for frequency response 
30 leveling practice. Some behavioral responses can be recognized but much more 
information must be known about the speaker. Measurement devices such as 
accelerometers, differential acoustic probes, as well as microphones, are needed for 
this. Instrumentation may be placed near a suspected behavior site and moved to 
explore how a response changes with position. Weighted notches can be tuned or 
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slowly swept through suspected frequencies while subjectively observing noise 
production. More information is needed about dimensions of parts, listening 
positions, as well as floor, shelf, possibly a computer monitor, or other interceding 
objects that may be part of the listening environment. Other technical specifications 
5 or expressions are needed to complete the conjugate model capable of time-phase- 
accurate correction. 

A himian operator can assume an alignment role by adjusting a graphic 
equalizer, manually tuning a parametric filter, or changing settings to a crossover 
device. Commercial analog components perform these functions, but they have 

1 0 limitations. Graphic equalizers have up to 3 1 bands or resonators, parametric devices 
include several adjustable filters and a few have variable crossover and shelf 
functions. Many more filters are needed. Combinations of graphic and parametric 
equalizers are incapable of providing a large enough number of points, nor the exact 
phase and time response to effectively compensate complex behavior from a 

15 loudspeaker. Either the corrections do not match specific firequencies, thereby 
creating phase error, or the number of filters is inadequate to deal with settling time 
and standing wave issues. Group delay distortion, time-phase error, incomplete 
correction and other shortcomings are likely to outweigh other improvements. 

DSP filters can create many more filter sections than is practical from analog 

20 circuits. Graphic equalizers made up with parametrically controlled sections have 
been used with specialized control-generating software to create room response 
leveling. Such processes are difficult to set up because the room interferes with the 
identification of important behavioral indicators. Without their input, conjugate 
response corrections are not possible. Standing wave and nodal distortion corrections 

25 could be made from such a system. However, the awkward compiling and processing 
needed to parametrically move the compensated notches would be difficult. Most 
likely, a single point response pickup and FFT has been used for data input to the 
system. Such methods cannot respond to or provide the time-phase information 
needed to create a true conjugate response to the speaker. Analysis systems, such as 

30 MLSSA, can remove room interference from measurements, and can produce 
frequency, transient, and settling response data from a loudspeaker system. However, 
the large amount of data from these measurements must be interpreted. The multiple- 
band graphic equalizer is not a good choice to install the correction. 
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DSP systems can economically create many parametric filters and time-related 
processes that are impractical with analog circuitry. Traditional large-scale DSP 
systems have little means to identify and cull out speaker behavior from other 
measurement anomalies. Their frequency- domain responses are likely to add phase 
5 errors and to overlook delayed settling energy. The sound might improve for one 
listening position but it will degrade for all others. More likely, the reproduced sound 
will change without definitive improvement. 

Hence, those concerned with the reproduction of sound have recognized the 
need for a system and method of modeling the complete behavior of sound 

1 0 reproduction devices such that conjugate responses to the somd reproduction device 
responses may be created. The need for a system and method employing modifiable 
conjugate response has also been recognized. Furthermore, the need has also been 
recognized for a system and method that compensates the reproduction of sound 
independent of the environment in which the sound is to be heard. The present 

1 5 invention fulfills these needs and others. 

ST JMMARY OF THE INVENTION 
Briefly, and in general terms, the present invention provides a system and 
method for modehng individual response characteristics of a sonic reproduction 
device to create a conjugate model for improving frequency, time, phase, and 

20 amphtude performance of the device and to provide improved sonic balance, sound 
clarity, reduced distortion and improved stereo imaging. 

In a first aspect, the invention relates to an apparatus for modifying an 
electrical audio signal for input to a sonic reproduction device characterized by a 
plurahty of individual responses. The individual responses of the device combine to 

25 define an overall response. Each individual response includes one or more of a 
frequency, time, phase or transient response. The apparatus includes a plurality of 
modification filters having modification responses that simulate the plurality of 
individual responses of the sonic reproduction device. The modification filters receive 
the electrical audio signal, modify the electrical audio signal and provide the electrical 

30 audio signal to the sonic reproduction device. The apparatus further includes a 
plurality of adjustable parameters. Each of the adjustable parameters is associated 
with at least one of the modification filters. The adjustable parameters allow for 
adjustments to the responses of the modification filters. The adjustments create a 
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plurality of individual conjugate responses. Each individual conjugate response is 
associated with at least one of the plurahty of individual responses. 

By creating a plurality of filters or networks having responses that model the 
individual responses of the reproduction device and providing parameters for adjusting 

5 the filter or network responses, the system allows for the creation of conjugate 
responses that provide specific opposing or correction responses to the response of the 
reproduction device. 

In a detailed aspect of the invention, the plurality of individual responses of the 
sonic reproduction device are related to at least one of mechanical, acoustic and 

1 0 electromagnetic behavior of the sonic reproduction device. In another detailed facet 
of the invention, the plurality of modification responses combine to form an overall 
response that is a conjugate to the overall response of the sonic reproduction device. 

In yet another detailed aspect of the invention, at least one of the modification 
filters comprises a cut-off filter and the parameters for adjusting the frequency 

1 5 response of the cut-off filter include peak frequency, amplitude and Q parameters. In 
still another aspect of the invention, at least one of the modification filters comprises 
a constant slope equalizer and the parameters for adjusting the frequency response of 
the constant slope equalizer include crossover frequency and boost shelf parameters. 
In other detailed facets of the invention, at least one of the modification filters 

20 comprises a parametric notch filter and the parameters for adjusting the frequency 
response of the parametric notch filter include notch frequency, amplitude and Q 
parameters and at least one of the modification filters comprises a parametric notch- 
boost filter and the parameters for adjusting the frequency response of the parametric 
notch-boost filter include notch frequency, amplitude and Q parameters. 

25 In a second aspect, the invention relates to a sound compensation system for 

altering an electrical audio signal for input to a sonic reproduction device having 
associated behavioral characteristics. The system includes a model of the sonic 
reproduction device. The model includes a plurality of fihers or processes that 
simulate at least one of the behavioral characteristics of the sonic reproduction device. 

30 Each filter has an associated response that combine to define an overall response for 
the model. Each individual response includes one or more of a frequency, time, phase 
or transient response. The system also includes a confroUer that modifies the response 
of each of the plurality of filters to transform the filter into a conjugate filter. Each 
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conjugate filter has a response that is a conjugate to the original response of the filter 
or process. 

In a detailed aspect of the invention, the behavioral characteristics are defined 
by individual or groups of individual components of the sonic reproduction device. 
5 By modeling the reproduction device ' s individual components and the characteristics 
of those components or groups of components, individual compensations for these 
characteristics can be created and manipulated parametrically. Therefore, these same 
compensations can be applied to additional systems having similar components or 
characteristics. 

10 In other detailed aspects of the invention, the filters are defined by digital 

signal processes or by analog circuits and the controller includes a computer or 
adjustable circuit components. In other detailed aspects of the invention, the sonic 
reproduction device comprises a speaker and at least one of the plurality of filters 
includes at least one associated adjustable parameter and the value of the parameter 

15 is calculated based on physical characteristics of the speaker, derived from a standard 
speaker model or determined experimentally using standard test measurements. In yet 
another detailed aspect of the invention, the controller is configured such that an 
adjustment in the setting of one parameter modulates the setting of at least one other 
parameter. In still another detailed facet of the invention, the controller monitors the 

20 program conditions at the sonic reprodrxction device and sets at least one of the 
parameter values based on the program conditions. 

In a third facet, the invention relates to a sound system. The sound system 
includes a sonic reproduction device having associated mechanical, acoustic and 
electromagnetic behavioral characteristics. The sound system also includes a source 

25 for outputting an electrical audio signal to a model of the sonic reproduction device. 
The model includes a plurality of filters that simulate at least one of the mechanical, 
acoustic and electromagnetic behavioral characteristics of the sonic reproduction 
device. Each filter has an associated response that includes at least one of a frequency, 
time, phase or transient response. The model outputs the electrical audio signal to the 

30 sonic reproduction device. The sound system farther includes a controller that 
modifies the responses of the filters to transform the model into a conjugate model 
having a plurality of filters with responses that comprise conjugates to the original 
response of the filter. 
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In a fourth aspect, the invention relates to a method for modifying an electrical 
audio signal for input to a sonic reproduction device that is characterized by a plurality 
of individual responses which in combination define an overall frequency response 
for the sonic reproduction device. Each individual response includes one or more of 
5 a firequency, time, phase or transient response. The method includes the steps of 
simulating the plurality of individual responses with a plurality of filters and adjusting 
the responses of the plurality of filters such that, for each filter, the adjusted response 
comprises a response that is a conjugate to one of the individual responses. The 
method further includes the step of inputting the electrical audio signal to the filters. 

10 In a detailed aspect of the invention, at least one of the filters comprises a cut- 

off filter and the step of adjusting the firequency response of the cut-off filter includes 
the step of setting at least one of peak fi-equency, amplitude and Q. In another detailed 
facet of the invention, at least one of the filters comprises a constant slope equalizer 
and the step of adjusting the frequency response of the constant slope equalizer 

1 5 includes the step of setting at least one of crossover frequency and boost shelf In still 
another detailed aspect, at least one of the filters comprises a parametric notch filter 
and the step of adjusting the frequency response of the parametric notch filter 
comprises the step of setting at least one of notch frequency, amplitude and Q. In yet 
another detailed aspect of the invention, at least one of the filters comprises a 

20 parametric notch-boost fiher and the step of adjusting the frequency response of the 
paramefric notch-boost filter comprises the step of setting at least one of notch 
frequency, amplitude and Q. 

In a fifth facet, the invention relates to a method of altering an electrical audio 
signal for input to a sonic reproduction device having associated behavioral 

25 characteristics. The method includes the step of simulating at least one of the 
behavioral characteristics of the sonic reproduction device with a plurality of filters. 
Each of the filters has an associated response comprising at least one of a frequency, 
time, phase or transient response. The method further includes the step of, for each 
of the filters, modifying the response of the filter to transform the filter into a 

30 conjugate filter having a response that comprises a conjugate to the original response 
of the filter. 

In detailed facets of the invention, the sonic reproduction device comprises a 
speaker, at least one of the plurality of filters has at least one associated adjustable 
parameter and the step of modifying the response of the filter includes one or more of 
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the following pairs of steps: calculating the value of the adjustable parameter value 
based on the physical characteristics of the speaker and setting the parameter to the 
calculated value, deriving the adjustable parameter from a standard speaker model and 
setting the parameter to the derived value and determining the adjustable parameter 
5 experimentally using standard test measurements; and setting the parameter to the 
determined value. In still another detailed facet of the invention, the method further 
includes the step of modulating the setting of at least one parameter in response to the 
setting of another parameter. In another detailed facet, the method further includes the 
steps of monitoring at least one program condition at the sonic reproduction device 

10 and setting at least one of the parameter values based on the program condition. 

These features and the ability to maintain sonic neutrality make a 
compensation system and method capable of complex, dynamically changing response 
corrections, which can be controlled and adjusted with simphfied, intuitive control 
specifications. Compared to traditional response-leveling methods, the compensation 

1 5 method and system requires less processing complexity and can easily be applied to 
different sound-reproducing systems. The compensation method and system, as a 
whole or in piece parts, can be turned on or off, moved from one frequency to another, 
or otherwise be changed by simple, intuitive commands. 

These and other aspects and advantages of the present invention will become 

20 apparent from the foUowingmore detailed description, when taken in conjxmction with 
the accompanjong drawings which illustrate, by way of example, the preferred 
embodiments of the invention. 



BRIEF DESCRIPTION OF THE DRAWINGS 
FIG. 1 is a block diagram of a sonic reproduction system incorporating a 
25 compensation system in accordance with the invention; 

FIG. 2 is a block diagram of a compensation system having a plurality of 
modification filters, each having a plurality of adjustable parameters for modifying 
one or more of the frequency, time and phase responses of the filters; 

FIGS. 3a-3b depict a plurality of response components for a loudspeaker; 
30 FIG. 3f depicts the overall response formed when combining the individual 

responses of FIG. 3a-3e; 
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FIGS. 4a-4e depict a plurality of adjustable modification responses for a 
compensation system, each response is adjustable to form a conjugate response to the 
response components of FIGS. 3a-3e; 

FIG. 4f depicts the overall conjugate response formed when combining the 
5 individual frequency responses of FIGs 4a-4e; 

FIG. 5 is a graph depicting the motion for a circular cone to produce one 
acoustic watt output; 

FIG. 6 depicts the frequency responses for two small loudspeaker drivers; 

FIG. 7 depicts a waterfall plot wherein the arrows at the right show the 
10 increasing time axis; 

FIGS. 8a-8f depicts a series of graphical user interfaces for adjusting 
parametric controls for modifying the responses of the modification filters; 

FIG. 9 is a schematic of an low-pass/high-pass peaking filter, where all Cs 
must change to move frequency; 
1 5 FIG. 1 0 is a schematic of an active RC or constant slope equalizer that boosts 

and has approximate parametric independence, where Cc and Rc are both very large 
to bias the op amp; 

FIG. 1 1 is a schematic of a frequency movable notch; 

FIG. 12 is a schematic of an alternate configuration of a frequency movable 

20 notch; 

FIG. 13 includes a schematic diagram of a weighted notch filter and the 
responses for boost, and notch components and a combined response, obtainable using 
the filter; 

FIG. 14 includes a schematic diagram of amulti-resonant weightednotch filter 
25 and the responses for boost and notch components and a combined response 
obtainable using the notch filter; 

FIG. 15 depicts the frequency, and phase responses for a notch filter; 
FIG. 1 6 is a schematic of a delayed interference simulator/compensator where 
CW equals the same response as interference, COW equals a conjugate correction and 
30 RC equals a decrease compensation for higher frequencies; and 

FIG. 17 is a schematic of an all-pass or phase shift network. 
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DETAILED DESCRIPTION OF THE PREFERRED EMBODIMENTS 
The following description focuses on the apphcation of the present invention 
to a loudspeaker system. The invention, however, is not limited to such applications 
and may be applied to other sonic transmission and reproduction devices such as those 
5 set forth at the end of the specification. 

Referring now to the drawings, wherein like reference numerals denote like or 
corresponding parts throughout the drawing figures, and particularly to FIG. 1, there 
is shown a system 10 incorporating the present invention. The system 10 includes a 
signal source 12, for providing an electrical audio signal. The signal source may be, 
10 for example, a CD player. The output 14 from the signal source 12 is input to a 
compensation system 16 which employs detailed features and aspects of the present 
invention. The output 14 is processed by the compensation system 16 to produce a 
compensated electrical audio signal 18 which is fed to a power amphfier 19 and a 
loudspeaker 20. 

1 5 With reference to FIG 2, the compensation system 1 8 employs a plurality of 

fdters 24 which, either individually or in combination, exhibit individual 
compensation responses which simulate the frequency, time and phase responses 
exhibited by the various mechanical, acoustic and elecfromagnetic components of the 
loudspeaker. Associated with each of the filters 24, and thus each of the compensation 

20 responses, is one or more adjustable parameters 22. The filters 24 are created using 
DSP or analog circuits. Digital signal processing is the preferred implementation, 
since analytical models of loudspeaker behavior translate easily to the mathematical 
synthesis techniques used for designing digital systems. Analog circuits have 
distortion build-up in cascade architectures. Therefore, a practical analog 

25 implementation of the compensation system 18 is possible only when the analog 
designer is aware that parallel-connected circuit elements can be used when behavioral 
responses are isolated and non-interactive. Some parameter 22 adjustments interact 
with one or more parts of the compensation system. A digital implementation 
provides the ability to utilize a compilation of possible settings or to calculate these 

30 relationships as needed. When the compensation system is controlled from a 
computer the setup adjustments appear simple and intuitive. 

Each of these computed and adjustable compensation responses can be scaled 
to a parametrically variable, feature, or design aspect, relating to size, a moving 
property, or acoustic radiation behavior, amongst other things. Time delays. 
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maximum excursion limits, wavelength relationships, nodal and standing wave 
frequencies, boundary reflections and like properties of the speaker can be adjusted 
and used by the compensation system. Instead of compiling or reducing speaker 
elements to create a lumped response system, the compensation system uses 
5 minimum-phase equivalence and strings of non-interacting filters. 

A typical overall response for a small speaker is shown in FIG. 3f. The same 
response is repeated at the top of FIG. 4. Figures 3a-3e shows a plurality of individual 
responses related to speaker components which combine to produce the overall 
response curve. Figures 4a-4e show a plurality of individual compensation responses 

1 0 which are adjusted via a plurality of adjustable parameters, e. g., Lg, H^, Lx, Hx, etc., 
to produce a plurahty of conjugate responses. Properties of the parameters are 
described in detail below. As shown in FIG. 4f, the individual conjugate responses 
combine to produce or an overall conjugate response . The combination of the overall 
speaker response (FIG. 3f) and conjugate response (FIG. 4f) produce a smooth 

15 response. 

From FIGS. 3 a and 4a, the first and second cutoff inflections for both high and 
low frequencies are evident. These points on the curve determine the frequencies for 
Lx, Ls, Hx, and Hg. When voice coil length and motional comphance capabihty are 
known, then a calculation or chart, similar to the one shown in FIG. 5, can help 
20 determine a reasonable frequency and amplitude for Lp. Hp is treated in a similar 
manner. Related inflections, cutoff, and frequencies are shown in FIGS. 3b and 4b. 
Amplitude settings of Lp and Hp have subjective power handhng and weighted 
compensation issues. 

Self-resonance of the driver operating in its enclosure can be measured or 
25 calculated to yield Wq. The related Qq and |A|o settings can be experimentally 
measured or calculated from traditional models, provided the acoustic coupling factor 
has been removed. Figures 3d and 4d show this bass compensation. 

Representations of a mechanical resonance, like Wj, are seldom used in 
conventional models. The higher fi-equency parts of FIGS. 3d and 4d show that 
30 acoustic response error and coloration from W| can be removed by setting |A|i. A 
surround resonance is noted and a preset or defauh Q can be chosen to compensate a 
resonant behavior model typical of loudspeaker materials involved. 

Nodes and interference behaviors are evident in FIG. 3e. Other examples in 
FIG. 6 reveal node jumps, interference, and related problems frequently called "cone 
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cry" because of harsh, smeared sound. Waterfall or MLSSA plots like those shown 
in FIG. 7, can show the frequency and delayed breakup consequences typical of such 
high-energy moving interference. Hidden compensation notches W^ci and Wcc2 of 
FIG. 4e remove these frequencies and energy storage problems. 
5 A slope or tilt EQ is added to achieve a best Ustener preference. Figures 3c 

and 4c show behavior and correction. Additional downward tilt might be added for 
subjective balance. 

As can be seen, approximately 12 to 16 adjustments, each spanning as few as 
8 bits of resolution, can make a very good conjugate correction. Representative 

1 0 frequency responses from two loudspeaker driver units are shown in FIG. 6. Note 
that, as indicated by the roll off of the response curve at the low end, the Wq and 
second inflection response related to Lp are missing because the driver operates in a 
very large enclosure. Other than this, the other parametrically related features are 
evident and adjustments can be worked out from these curves. 

15 The following parameters allow for the creation of, simulations of, or 

conjugates to, the complex frequency, phase, and time responses of a loudspeaker. 
These adjustable parameters 22 and their operations can approximate zero-phase 
response, extend bass output, and remove mechanical sounds from a speaker (other 
par^neters can be used in a similar manner). The individual compensations can be 

20 performed digitally or using active or passive analog circuits, such as RC circuits, 
analog resonators, or fiilly paramefric circuits like state- variable filters or biquads. 



Term 


Acronvm 


Description, Relationships 


Low 

Crossover 


Lx 


Radiating area, compliance, air volume, 
acoustic coupling, and Bl factors, (first 
inflection@+/- 6dB per octave) 


High 

Crossover 


Hx 


Mass, radiation area relationships, 
stifftiess, Bl factors. (First inflection at +/- 
6dB per octave) 


Low Boost 
Shelf 


Ls 


Design limit, sonic balance, (XdB stops 
slope) 


High Boost 
Shelf 


Hs 


Design Limit, power handling, useful 
response linearity (XdB stops slope) 



15 
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Term 


Acronvm 


r^escnpuon, jtvciaLiuxioiiipJs 


Low Peaking 




Boost for second coupling inflection. 
Hidden compensation for high-pass or 
low frequency limit filter, (default cutoff 
slope, XdB peak) 


High Peaking 


Wh 


Boost for second high-frequency loss 
inflection. Hidden compensation for low- 
pass or mgn-irequency umii nicer, 
(default cutoff slope, XdB peak) 


Motor 




rorce, DacK dvir', mGucLdiicc iduioib. 
Modulates responses and effects of 
parametric values 


Bass 

Resonance 


Wo 


Volume, compliance, area, damping, Bl 
factors (frequency, Q, amplitude) 


Port Tuning 




Bass tune model (traditional) (input for 
double-tuned filter model) 


Mechanical 
Resonance 


Wi,W2, through 


Parts of system including panels, cones, 
surrounus, ana. aomes i^rrequency, <mu 
amplitude) 


SettUng 
Resonance 


through WcQ, 


Node Modes: standing waves, bell modes, 
delay-coupled interference (weighted 
notch frequency, Q and ampUtude) 


Coupling 
Factors 


|A|„|A|,...1AI„ 


Resonant magnitude (always adjustable 
parts of resonators +/- dB) 


Loss Factors 


Qo. Ql • • Qn 


K.esonani oanciwium \^aeiauu or 
adjustment possible +/- dB) 


Tilt 


oB 


Departure from frequency-balanced 
output: Bl factors. Subjective balance 
and default placement equaUzation 


Wave 

Interference 


Td 


Dimensions: enclosure, floor, wall, 
speaker and listener placements. 


Equalization 


EQ 


User operated: room, other traditional 


Power 


Pw 


Maximum low- frequency input or output. 
Analog proportional or threshold switch 
detector. 


Mode Switch 


SWl, SW2, etc. 


Dynamic process: operate or select 



20 Somewhere between 8 and 32 parameter adjustaients might be used to program 

the compensation system and operate an adequate compensation process. Since 
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parameters are related to specialized physical and behavioral aspects, data 
requirements for adjustment ranges and precision are much smaller than needed for 
coverage of human perception. Eight-bit resolution is adequate for many of these, so 
that a one-time data stream of 1 -5 kbits characterize a very complex response from the 
5 model. A description of the foregoing parameters follows. 

Low Crossover (L v ) or Acoustic Coupling - Low frequency output depends 
on the size of radiating surfaces. The 6dB-per-octave loss from this relationship is 
inherently compensated by increased cone motion provided the back voltage from the 
motor structure is small compared to the driving signal. If compliance were infinite 

1 0 and the motor produced force without velocity restriction, this idealized configuration 
would have flat response. Real systems having air volumes, mechanical stiffness, and 
velocity limits have two practical crossover points where the response breaks from flat 
and converges to 6dB/octave and then to 12dB/octave bass loss. Usually, the second 
inflection is near the lowest usefiil response of the loudspeaker and often becomes 

1 5 impractical to compensate. The control parameter for this compensation is frequency 
in Hz and the conjugate response (specific compensation) is a +6dB/octave boost for 
decreasing frequency. This boost starts at the first response inflection from the 
speaker. The value for this parameter can be measured by applying a test signal, e. 
g., sine wave, to the speaker and measuring the response. The value may also be 

20 calculated based on physical characteristics of the speaker such as cone and coil mass . 
The value may also be derived from a speaker model such as a standard Theil/Small 
model which is generally provided by the speaker manufacturer. 

High Crossover (H y ) or Mass-Comphance Factor - High frequency output 
depends on the size and velocity of the radiating surfaces. Usually, the wavelengths 

25 of interest for frequencies near cutoff are small compared to the motional part of the 
speaker creating the output. Stiffness and damping properties of the cone material 
affect this transition from whole surface radiation at lower frequencies. Higher 
frequencies radiate nearer the voice coil. Moving mass eventually creates a 
6dB/octave reduction of motion with increasing frequency. Leakage inductance from 

3 0 the motor assembly adds fiirther compliance to the system to create a second inflection 
making a 12dB/octave drop at the highest practical frequencies. These losses, 
combined with decreased radiating area, create a reduction of acoustic output. At 
lower frequencies, the two relationships can be skillfully balanced to create flat 
acoustic response. The control parameter for this compensation is frequency in Hz, 
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and the conjugate response is a 6dB/octave boost with increasing frequency. The 
value for this parameter can be measured or calculated in a manner similar to that 
previously described for low crossover. 

Low Boost Shelf (L^ l - Maximum boost from Lg is restricted to practical 
maximum limits from the amplifier power, cone motion, voice coil length, enclosure 
size, and intended bass extension. These requirements conflict and interact, e. g., 
longer voice coils require bigger amplifiers and suspension parts. For example, an 
extended coil can provide greater linear excursion and bass output potential, but 
efficiency decreases unless flux energy from the magnet is increased. Increased 
excursion requires bigger surrounds and the cone diameter must be increased to 
maintain the same radiating area and bass output. Bass resonance is lower, but the 
speaker must be physically larger, and the increased moving mass further reduces 
efficiency. If amplifier power is limited the enclosure becomes larger. Manipulation 
of the Lx, Wo (described below) and Lg parameters makes efficient or extended 
response loudspeaker designs with much less compromise. In addition, the Lg 
parameter can be made to change or track different volume control settings and 
program dynamics, so that the speaker system can operate near its maximum 
capability for a wide range of conditions. The Lg parameter is affected by design and 
construction factors, which include radiation area, compHance, and force factor of the 
driving motor. The modeled parameter can track changes to these factors with very 
little interaction. The Lg parameter is +/- dB. The Ls parameter setting can be 
determined by experimenting with compromise tradeoffs via test measurements. 

High Boost Shelf fHc ) - Practical maximum performance and power handling 
capabihty of the speaker limit the maximum high frequency boost. In some 
applications the parameter might be set to reduce perceived distortion from a 
program source instead of from the speaker. As with Lg, the internal operational 
settings can be made to change by command. This feature could help cover up 
increasing distortion when other parts of the system, including program material, is 
pushed to operate above their maximum linear power capability. The Hg parameter 
is +/- dB. Its setting is best determined experimentally via test measurements. 

Low Peaking (W t ) - A resonant bass cutoff is often preferred. Recordings are 
balanced for this and most speakers are designed to have self-resonant bass 
enhancement. Generally, larger speakers have lower resonant frequencies and 
listeners associate value to this relationship. The parameter provides a low 
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frequency resonant boost below the natural self-resonance (Wq) of the speaker itself. 
When a low Ql compensating response dip removes the Wq effect, the speaker system 
behaves electrically and sonically as if it were larger. It will not have the boom or box 
soxand of an equalized small speaker. To prevent excess distortion and power draw, 
5 the signals below Wl are attenuated rapidly and the high-pass filter involved tracks the 
Wl parameter setting. This action has subjective factors similar to weighted 
compensation, since jfrequencies below cut-off can be weak but still audible when not 
masked by other sounds in the Wl critical band of human hearing. Generally, Wl 
peaking is adjusted and set to control power and distortion for maximum playback 
10 conditions. For other conditions, the high-pass or sub-bass fiher can be shut off and 
parts of the low-pass fdter (Lp) moved or changed without obvious subjective 
consequence. As mentioned, the Wl parameter can be dynamically modulated to 
extend bass or reduce distortion. Adjustments to the response of the low-pass fiher 
include peak fi-equency (Wl) and amplitude IAlI in dB. Default Ql setting is imphed. 
1 5 High Peaking (W^ ) - A resonant cutoff may be preferred to compensate for a 

second cutoff inflection, or it can be used to restrict reproduced bandwidth. The first 
application can extend response and reduce group delay distortion. Bandwidth 
restriction might be needed to make a distorted program sound better. A peaking 
resonator and tracking high-pass filter (Hp) operate in a similar manner to the low- 
20 firequency peaking system. The high-pass fiher can be ahgned to create a weighted 
response limiting and to provide a peaked cutoff response preferred in contemporary 
design practice. High-pass filter adjustments include peak frequency (W^) in Hz and 
amplitude (|Ah1) in dB. Defauh Qh setting is implied. 

Motor (B l) - Properties of the magnet structure and voice coil are consolidated 
25 to a traditional representation. Voice coil diameter, winding length, gap flux, pole 
dimensions, etc., are parts of traditional speaker models creating motor and generator 
equivalents. Force and back EMF relationship, with electrical current and mechanical 
motion, as well as other factors related to mechanical properties, get simpHfied 
representation. Sometimes leakage inductance and mechanical mass relationships are 
30 included. These elements are measured, calculated, or derived by various means to 
create a group of motor-related parameters that can affect many performance aspects 
of the speaker. Adjustable parameters to the compensation system and its processing 
are dependent ouBl- Therefore, if needed, the model can have relationships set up so 
that Bl changes can modulate parameter settings. For example, the Bl specification 
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can be used to track or readjust other parameters for similar speakers having different 
magnet weights, voice coil lengths, or other electro-mechanical factors. The 
adjustable Bl parameters can be: flux x length, volts x velocity, peak excursion length, 
and resistance/inductance or time constant. 
5 Bass Resonance (Wg) or Self-Resonance - This is the natural bass resonant 

frequency of the loudspeaker. Its value is determined by air volume, mechanical 
compliance, radiating area, damping, moving mass, motor characteristics, and other 
design features of the speaker. Unlike traditional bass models, an acoustic coupling 
factor is not part of the Wq response, since it has already been accounted for in the Lx 

10 parameter of the compensation system. This arrangement prevents interaction 
between adjustment parameters and the equivalence to mechanical behavior 
transforms to an LCR resonator equivalent of mechanical behavior. User command 
language of frequency Wq, Qq and coupled energy or amplitude |A|o can specify 
conjugate responses to the mechanical resonant behavior. Because the speaker 

15 behavior and correction responses for the system are of the same order, but opposite 
amphtude, the group delay performance can be very good. Adjustments are Wq in Hz, 
Qo as a number, and |A|o in dB. These adjustment values can be experimentally 
determined by very-close-range instrumentation, position sense transducers, or by 
calculation. 

20 Port Tuning (W^ ) - Many speakers are designed to provide a secondary bass 

resonance intended to extend frequency response or improve power handling. 
Physical structures to do this include ports, tubes, passive resonators, labyrinths, other 
woofers, etc. Much literature has been devoted to modeling and tuning these systems, 
usually to achieve flattest possible frequency response. Such models, combined with 

25 the compensation system, have the potential to extend bass, improve transient 
response, and improve efficiency without adding cost to the speaker. Greater power 
handling and extended bass capability can be structurally designed and the resulting 
frequency response irregularity and end band distortion compromise from using this 
sfrategy can be removed by conjugate correction. When this choice is made, ports can 

30 be larger and tuned lower, enclosures made smaller, along with other changes to 
improve bass. The resulting consequences of rough response and sub-bass overload 
are reversed by the compensation system. Flags or switches can be part of a control 
operation, which identifies program conditions or response states at the loudspeaker. 
Limit conditions from samples or tests determine switch states for this feed- 
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forward/feed-back type system. Then, parameter coefficients are chosen from the 
switch or status inputs. In this manner, the compensation system can operate with 
fuzzy logic controls or other means to prevent unnecessary toggling or changes to 
parameter values. For example, different volume control settings, program levels, or 
5 bass content can change parameter coefficients and alignment to achieve a higher 
power or flatter response optimization. The switching operation is likely to be 
audible, but the control hysteresis provides strategic changes that are less apparent or 
objectionable. Inexpensive equipment is intended and likely to overload or be pushed 
beyond a reasonable linear operation. The compensation system operating with 

10 appropriate control logic can activate soft and loud operational states, each having 
optimum alignments, without creating a continuum of distortions inbetween. 

Mechanical Resonance (W , . W . . through - Many parts and actions of a 
speaker system behave like resonators. Unlike Wq, most of these are imintentional and 
they usually add to the acoustic output of the speaker. These include flexure and mass 

15 behavior of the domes, cones, and surrounds, as well as cabinet resonance, among 
others. Equivalent LCR behavior is parameterized to non-interacting individual 
corrections or adjustments similar to those for Wg. Resonance adjustments are Wi, 
W2, through W„ in Hz, Qi, Q2, through Q„ (described below) in imits, and iA|„ jAjj 
through |A|„ (described below) in +/- dB. Often a small, low-Q resonance that 

20 appears similar to room responses has sonic impact. Unlike a test microphone used 
for traditional response leveling, a listener can move around and, in time, can sense 
and become aware of signal decays that collapse to broadband resonance. Conjugate 
correction eliminates this difficulty and helps to improve the outcome firom ancillary 
equalization systems. 

25 Settling Resonance (Wc ci. '^cci through W^ cn^ - The hidden compensation 

processes using multi-resonator notches and weighted side energy enhancements are 
placed in frequency and adjusted by these control parameters. Sonic consequences 
from delayed nodal resonance and standing wave interference is diminished or 
removed. 

30 Coupling and Loss Factors (|A|o. | A| ] .through |A|„ and O ; , O -^ .through - Q 

parameters for some frequencies can be estimated default values which work for 
materials, designs, and construction materials common to speakers. Since it is almost 
impossible to casually determine Q from a response plot or simple measurement, the 
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fixed value is practical, and the default choice simplifies and reduces the number of 
adjustments. 

Wave Interference (Td) - The finite dimensions of speaker enclosures can 
create wave-related interference pressure behind the radiating surface. Usually this 
5 problem is ignored because of the complexity of the correcting response. Expensive 
speakers are built with big motor assemblies having tight magnetic coupling to combat 
back-wave interference. Often these systems have inner baffles, layerings of different 
types of absorbent material, specially shaped rear cavities, or transmission line tubes 
to help remove the interference. Typical speakers exhibit constructive/destructive 

10 wave interference from their simple box t5^e enclosures, which ultimately cause 
response ripples of increasing occurrence with frequency. The irregularity worsens 
as the shorted-tum effect, and damping from Bl, are reduced by smaller magnets, 
reduced steel and other economic factors. Corrections are made by a conjugate 
opposing response from a delay-and-feedback-loop process. Although an analog 

1 5 implementation is possible, DSP methods are more economical and by their nature 
make good equivalence to the physical behavior and problem to be fixed. A similar 
correction can reduce reflected interference from the floor, table top, walls, etc. 

Tilt fdB) — Most contemporary listeners prefer a speaker whose response drops 
slightly with increasing frequency. When a speaker is made less expensive its 

20 response tends to rise. The compensation system corrects many problems and changes 
that occur from reducing magnet weight, improving efficiency and extending high 
frequency response. However, the flat acoustic balance created from these conjugate 
corrections may sound either muddy or thin compared to a contemporary tone 
standard. Tilt creates a compensating response slope. The tilt parameter operates like 

25 a tone confrol and is used to achieve a desired bass-treble balance. Internal 
manipulation of the and H^, as well as traditional response leveling methods or 
processes create this response. 

Delay or All-Pass - This parameter moves the signal in time to compensate for 
transducers radiating high and low frequencies from different places. Adjustments can 

30 reduce group delay distortion, improve phase match to a sub woofer and align 
transient response. Adjustments can be made using physical or electrical 
measurements . 
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FIGS. 8a through 8f show control panel displays and menus used to adjust 
parameters. Measurement data, design expressions, and response curves provide 
useful information to adjust or tune the system to the loudspeaker. The system 
generates conjugate responses to those of the speaker and silently removes delayed or 
5 long-settling mechanical sound. Experience has shown better performance for many 
listening positions compared to more coinplex conventional leveling practice. 
Common digital processes can be utilized for the implementation of these functions. 
Exemplary known digital processes are shown in Appendix A. Alternative known 
digital implementations can be used to achieve a wholly similar result. 

10 The compensation system may also be implemented using analog circuits. 

However, parts of multi-resonators or coupled flmctions are not likely to track wide 
adjustment ranges unless they are complex. Hence the analog circuits are shown for 
their functionality and similarity to well-known better DSP equivalents. These circuits 
have adjustable parametric controls, but they require component changes to simulate 

1 5 the parametric alignment accuracy inherent with the digital system. The following 
examples are traditional circuits that have semi-parametric adjustment capability and 
produce conjugate responses like those described. 

Cutoff Filters - Sallen and Key circuits can make active high-pass and low- 
pass filters with adjustable peaking responses. Figure 9 shows the two filters 

20 configured to a single op amp. Mid-band response is flat and cutoff slopes are -i- and 
- 1 8dB per octave. Pealdng amplitude of Lp and Hp are adjustable and coixespond to 
FIG. 4b. However, the frequencies must be preset for this circuit. For this example, 
the two sections do not interact with each other because of their wide frequency 
separation. 

25 Constant Slope Equalizers — RC time constants are changed in an active 

feedback circuit to create response curves like FIG. 4a. The circuit shown in FIG. 1 0 
is the boosting half of a sophisticated parametric tone control. Its adjustment range 
is limited for good parametric independence between shelf and crossover. 

Parametric Notches - Figures 1 1 and 12 show simple analog notch circuits 

30 having a wide tuning range. Notch depth stays constant but Q increases with 
frequency setting. Component values can be chosen to provide a reasonable 
approximation to Q^, Q, through for practical adjustment ranges. 

Weighted Compensating Notches — A composite filter element is made up 
from one or more sharp notches, each having energy added to either or both sides of 



23 PACIF-55288 

the reject frequency. When its rejection and boosting energies and bandwidths are 
care&Uy chosen, the fiher system can remove unwanted energy with little 
compromise or alteration to sonic balance. Reject notches, for this purpose are sharp, 
have high attenuation and are generally high-Q. The side band compensations or 
5 restorations are best made from boost responses at both sides of the rejection. 
However, a one-sided compensation may work better for speakers having combined 
response roll off and interference energy problems. The unsymmetrical boost helps 
flatten the frequency response. Other aspects are the same. Compensations can be 
very small, have low Q, and the average pink noise energy in a one-half to one octave 

10 band centered to the correction is constant when the process is on or off. 

Decay from sounds can perceptually shift to low-Q side-band frequencies. 
Consequently, a double-tuned alignment for better immediate transient response 
settling is preferable to a one-sided or single-tuned boost method. The resulting 
composite filter can be careftilly tuned and scaled so that it can be silently tuned over 

15 a useful frequency range. Without weighting, the small response losses on either side 
of the correction contribute to a nasal sound. The coloration may be subtle but when 
more corrections are used the losses can overcome any advantages. This is 
particularly true if the response is just made flat, as it might with standard-practice 
equaUzation. Weighting eliminates the compromise and allows multiple corrections 

20 to be more effective and free of sonic interaction and also eliminates loss when 
unintentional correction is applied to a speaker having different behavioral properties. 

For either implementation, neutral weighted response notches can be made up 
from resonant and anti-resonant responses added to the signal. With reference to FIG. 
13, a correction element might incorporate a single high-Q notch, whose frequency is 

25 centered on the behavior mode. One low-Q boost response is placed at the same 
frequency to provide the compensating equal-weight energy. The circuit portion of 
FIG. 13 shows a practical combination of an active circuit notch and passive LRC 
boost resonator in a feedback path. Both parts create the weighted response notch. 
However, the tuning range is limited, and the low-Q boost is likely to be audible, since 

30 the himian hearing perception can resolve transient sounds decaying to a low-Q 
resonance. 

A better alternative is to use two low-Q resonant boost responses, each tuned 
and placed at one or both sides of the high-Q notch. Figure 14 shows an example 
made from four tunable bi-quad resonators or state variable filters. Two of the filters 
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create close spaced high-Q notches and the other two provide the boosted low-Q 
energy at the outer high and low sides. These state variable filters are easily created 
with DSP processors, and they maintain constant Q and notch depth over a wide 
tuning range. The analog system creating the responses shown in FIG. 15 has eight 
5 precision variable resistors ganged on a single shaft to tune the Wcci or weighted 
notch parameter. Figure 13 shows a circuit for one of four sections. Figure 1 5 shows 
response curves for two different Q settings and these correlate to those in FIG. 4d. 
The double-tuned boosts can be aligned to yield a faster and smaller settling response 
to transients. A double-tuned notch like that from the figures offers similar 

1 0 advantages and also provides a dead-band or band-reject capability to accommodate 
manufacturing tolerances from one speaker to another. Side frequency boost is still 
needed and double-tuned resonators are best used. 

Other variations and simplifications can be made when adjacent behavioral 
modes have similar properties, as is likely with most speakers. Two or more rejection 

15 notches can share Q and amplitude settings as well as compensation boost. 
Combinations include two notches with three boosts, two notches with two 
asymmetrical boosts, three with two, etc. A single low-Q boost with a frequency 
halfway between two notches can be used. Three low-Q boosts with frequencies 
below, above, and between are a better variation. For all of these implementations, 

20 the notch depth is often great and the side frequency boost is usually small. Usually, 
tiie overall energy response to random noise averaged about the compensation region 
is made to be the same or slightly higher than without correction. 

Delayed Interference or All-Pass - A hybrid analog-digital CCD device can 
create a small, convenient tunable delay. Though performance may be poor, they can 

25 be connected or configured like the example in FIG. 16 to provide interference-like 
behavior. The circuit can create approximate conjugate responses to wavelength 
related reflection and transmission behavior from walls, tables and the insides of 
speaker enclosures or other parts of the transmission path or system. The circuit can 
be set to create an inverted comb filter or additive interference like response which 

30 would be opposite in time, phase and amplitude to subtractive interference loss from 
reflecting surfaces. The correction boosts where interference takes away. The circuit 
can also be adjusted to have a comb filter like response to cancel additive energy from 
reflections within the speaker enclo sure. Better time delay interference filters or comb 
filter like responses can be made from DSP processes. Both the analog and the DSP 
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can be configured to be relevant to the physical reflection model and like other parts 
of the correction system, are controlled by parametric adjustments related to physical 
behavior. The delay interference path filter has controls relating to dimensions, 
surface absorption, and the amount of interference correction needed. 
5 With reference to FIG. 1 6, Td relates to the difference between the direct path 

from the speaker to listener and the longer bounce path also from speaker to listener. 
Td also relates to the out and return path between the speaker and an opposite surface 
inside an enclosure. A wall behind the speaker can be characterized the same way. 
Larger Td gives a larger distance. RC relates to surface roughness or absorption at 

1 0 high frequencies. Larger RC product for greater loss or faster attenuation of upper 
frequency comb filter response and correction. The control Rl adjusts the magnitude 
of the response or correction. CW direction increases subtractive responses while the 
CCW position near the + input to the op amp gives maximum additive responses. 
The circuit produces an interference response whose amphtude decreases with 

15 frequency. This matches or simulates losses of absorption materials of practical 
speakers. Much of the irregular response from small speakers can be experimentally 
changed to something that appears to be more easily processed by the compensation 
system. Usually, the delay setting to do this matches the back arrival wave 
relationship expected from the speaker enclosure. When it does, this one adjustable 

20 parameter equals a multitude of conventional response-leveling processes. 

Figure 17 is an all pass or phase shift network. Its frequency response is flat 
however its output is in phase and high frequencies and out of phase at low 
frequencies. The circuit alters transient response without changing frequency 
response. The variable control increases the transition frequency as it is turned CW. 

25 This element is usefiil to correct group delay and other transient related responses. 

As previously mentioned, mechanical disturbances produced by speakers are 
often audible, yet invisible or hard to interpret from response measurements made 
using a frequency sweep and microphone. Traditional compensation methods using 
a deep notch usually result in either a nasal sound or undesirable balance aberration. 
30 The weighted compensated notch filter of the present invention solves this problem 
and yields some other advantages as well. When two drivers (woofer and tweeter) are 
crossed over by just a capacitor or by circuits that overlap frequencies, one or both 
drivers can have interference compensation without perceptual loss to the other. The 
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same applies to different listening positions. One position having a bad response can 
be compensated without compromising the sound for other hstening positions. The 
correction is hidden by the weighted side energy. Since good listening positions are 
not compromised by the correction, a wide range of listening positions can have good 
5 sonics. This feature is particularly usefiil to horn-type loudspeakers for theater sound, 
where slightly different corrections are needed from one installation to another. By 
using default optimization for a class of speakers or construction features, parametric 
control and adjustment is simple and intuitive. 

Some of the most important behaviors of loudspeakers (with respect to 

10 acoustically perceptible effect) cannot be modeled or implemented from fraditional 
methods. Such behaviors include interference and resonant coupling, as well as 
nonlinear consequences from such behaviors. In addition, other spatial factors related 
to stiffness of moving parts and high frequency de-coupling for motions away from 
a driving voice coil need to be considered. Any of these can create source movements, 

15 delayed energy release and phase error to binaural hearing. Often, such destructive 
responses can be invisible or very difficult to interpret from traditional microphone- 
and-spectrum-analyzer calibration methods. 

An example of a parametrically addressed compensation for a specific physical 
effect is compensation for mechanical de-coupling in large full-range speakers. Such 

20 speakers are usually designed to have the entire cone move at low frequencies. At 
high frequencies, only the inner part of the driver is the primary active radiator. The 
rest of the cone is intentionally de-coupled to attenuate its nodal breakup. This design 
choice changes the position of an equivalent radiation source. A linear correction to 
move high-frequency radiation forward in time uses complex pass filters to create 

25 band-hmited delay of the lower frequencies. Then, as frequency increases, a latent 
delay decreases thereby maintaining a phase match to the response order of the 
speaker. Some group delay distortions can be removed this way. A physical 
dimension from the speaker along with attenuation and speed-of-soxmd properties of 
the cone can yield information to specify a correction from a dedicated filter process. 

30 However, the delay effect and de-coupling frequencies can be experimentally 
determined to yield parameter values. If some of the speaker parts change size or 
attenuation properties, new values can be extrapolated. 

An additional example of a parametrically addressed compensation, which is 
difficult or impossible to compensate using traditional methods, is compensation for 
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Doppler modulation in small speakers. Computer and multi-channel sound systems 
require small speakers to play very loud. The resulting combination of fast, high- 
displacement cone motions can impart an additive or subtractive velocity to the sound 
reproduced. The low-frequency movements of the speaker cone impart a Doppler 
5 modulation effect by moving the effective high-frequency radiating area. The effect 
is quite aimoying and creates a sound typical of small speakers struggling to play loud. 
When radiating area, frequency, and acoustic power output are known, a reasonably 
accurate calculation of the resulting cone motion and Doppler radiation factor can be 
made (see FIG. 5). An opposing alternating time delay is created for correcting the 

10 loudspeaker response. This multiplicative or non-linear process can make the 
equivalent radiation source steadier so that non-linear distortion is reduced. A good 
behavioral model of the speaker and a single dimension parameter can specify the 
correction. Any such open-loop or feed- forward non-linear correction is very difficult 
to accomplish. Modeled time-delay modulation is much better as it provides the exact 

15 conjugate response correction. The example is included here because cone motion 
from bass drivers is reasonably predictable from the model, and instantaneous 
correction from DSP methods will become more practical in time. Experiments were 
performed by using CMOS-type analog delays operating from voltage-controlled 
oscillator clocks. One path compensates for latency from both "bucket brigade" 

20 devices and the other receives the variable clock to produce delay modulation. 

For nodal flextures, wave interference and non-linear motion situations, the 
removal or attenuation of behavioral responses by using the weighted-notch process 
is a good compromise. The weighted compensation can be parametrically moved to 
where it is needed. If needed, its severity can be modulated to best match program 

25 dynamics, distortion from the loudspeaker, and human critical-band hearing 
perception. 

Additional bass output capabihty and response extension can be had when the 
dynamics of the audio signal are detected and used to change parameters or hidden 
compensations. This technique can work for any speaker system operating from the 
30 improved method. 

However, if parts of the speaker are designed to require the dynamic 
compensation, additional performance featiues are possible. An adjustment list or bit 
map intended for the specialized system can have the same parameters and 
adjustments as the general-purpose system, i. e., the controls have features in 
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common. Thus an electronic system with a compensation system is capable of 
receiving instructions to compensate and optimize a variety of speaker models and 
products which can be attached to it, both generic speakers and those designed 
specifically for use with the compensation system. When needed, the system can 
5 improve clarity, imaging, and bass extension without changing sonic balance, i. e. , the 
sonic signature of a product -line is maintained. 

The adjustment effect that parameters create are described or represented by 
a symbol or acronym as included in the previously described table. In this way, 
mathematical statements, circuits, loudspeaker design features and other specialized 

10 language are consohdated to hsts that a programmer or user can intuitively interpret. 
Then, response-curves, behavioral features, wavelength relationships, as well as other 
things important to human perception, become relevant to the process model used for 
design and/or compensation of a loudspeaker system. Compensation is simplified 
since interactions between design and performance changes and basic relationships are 

15 meaningful and intuitive. 

Settling and nodal compensation parameter adjustments include frequency in 
Hz, Q as a number, and rejection in dB. Since multiple-order nodal behaviors are 
possible, the Q and rejection adjustments are more likely to have similar values for 
more than one compensation frequency. Controls can be linked so that two or more 

20 frequencies in Hz can specify corrections for nodal behaviors sharing a mechanical or 
interference property in common. 

Bell-mode compensation for speaker cones provides a good example. Several 
methods can determine these frequencies. Multiple nodes or wave-related interference 
can be observed using sine wave excitation and optical interferometry. Waterfall plots 

25 from MLSSA-type stimulus, as shown in FIG. 7, or a differential microphone probe 
can be interpreted to reveal settling energy from breakup. These behaviors are audible 
and the hidden compensation process can be manually or slowly swept in frequency 
to reveal sonic changes during pink-noise reproduction. The experimental method 
requires caution and experience since room reverberation can imitate the mechanical 

30 sounds. Correlation between the three techniques is good, and when several 
frequencies from similar causes are determined, composite weighted notches of 
similar Q and shared boost parameters simplify the correction. 

The above parameters and their adjustments change a configured compensation 
for a speciahzed behavior of the loudspeaker. Some processes are inherently confined 
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to a narrow range of frequencies where a particular kind of behavior is most likely to 
occur from the loudspeaker system. Others affecting time and response slopes cover 
a wide spectrum. These dedicated operations are isolated enough from each other that 
interaction between them is small. Selected parameters can be changed without 
5 affecting others. In addition, the data requirements are modest for useful adjustment 
resolution. 

As described in the foregoing speaker example, controls adjusting the 
compensation system are related to physical parts and acoustic properties of the 
speaker. Other speakers of similar, but not exact design or construction can be 
1 0 improved in the same manner. The confrol or specification information to do so has 
the same simple, intuitive language. A small inexpensive speaker could be 
substantially improved with 1 6 parameter adjustments and a few default settings. To 
match the complex response from this system, a conventional multi-band or graphic 
equalizer would need weU over 100 band, and much more control information. 

1 5 The compensation system uses slopes, crossovers, and other mathematical 

functions to create predicted corrections for characteristics of the speaker. These 
operations are controlled by coefficients or points, and by process commands instead 
of from documenting and calculating responses to hnear plots. Since each process has 
a specialized nature, the range of frequencies, amplitudes, Qs, etc., confine parameter 

20 ranges to small portions of a control space. A three-word code can create an 
accurately placed resonator or complex weighted response notch subsystem. In the 
case of 8-bit code words, this map or information sequence gives 128 points for a 
logarithmic frequency decade, +/- 20dB in l/2dB steps for amplitude, and 16 Q 
settings, as well as space for process commands and control formatting. For this 

25 example, 384 points or frequencies in the audio band would be available for setting 
sharp rejection notches and weighted compensations. Bitmaps for other parametric 
controls and process commands may require less resolution, thus providing even 
greater economy. This compact specification featiare could be used for bar-code 
installation of the compensation system to correct a specific speaker design or for 

30 dynamic control of processes from codes hidden in data streams such as used in 
HDCD systems. As described in detail below, portable devices, such as hearing aids 
and communication systems benefit when the scope of processed information is 
reduced. 
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For many applications, 384 points or frequencies in the audio band might be 
chosen for a successful process incorporating ten basic operations, z. e., shelves, 
notches, compensations, cutoff filters, delays, etc. Process scale increases very rapidly 
with resolution: rejection notches can be sharp and need accurate tuning, interference 
5 compensations are inherently complex and speaker responses from a traditional 
measurement practice reveal little useful information to simplify processing. Unless 
the compensation system is designed to recognize and process sub-system or modeled 
responses from curves, the corrections must be done on a point-by-point basis. Even 
a good response correction done this way requires substantial process power. The 

10 scope of conventional processing widens when time, phase, and settling issues are 
considered. For this situation the number of filters or processes needed to resolve a 
useful correction response anywhere in a three-dimensional grid (such as a waterfall 
plot) can be impractical. Some economy is possible when filters or processing power 
are allocated to those portions of the grid requiring higher resolution and more 

15 correction activity. Even these efforts fail to achieve the hidden or compensated 
correction benefits of the compensation system. 

A good example of this difficulty is evident from FIG. 6. The compensation 
system has 8 notches, one weighted notch for node correction, and a low frequency 
boost crossover and shelf. The high frequency drop provides a crossover to a tweeter. 

20 Clearly, the difficulty of plotting points and creating a response synthesis is evident. 
The compensation system creates this conjugate curve from 24 adjustments (Lx, Lg, 
Lp, Wq, Qo, jA|o, Wj through W7, |A|, through lA],, Wcci, and one default Q setting). 

A strategy similar to compensating the removal of in-band signals can be used 
for the highest and lowest frequencies. For example, distortion caused by excess cone 

25 motion from bass energy can be less objectionable by reducing the input to the 
speaker. One way to do this is to restrict the low frequency response to a practical 
value. Quite likely, the speaker would have been able to make feeble bass 
reproduction below the cutoff, provided the program material does not mask the low 
bass signals. Wide dynamic range program material can force the speaker to produce 

30 perceivable output at these frequencies. Unfortunately, the resulting feeble output is 
frequently covered up by other sounds in the same perceptual band of human hearing. 
Hence, most of the time an extended response from the speaker is useless and only 
adds distortion and consumes ampUfier power. 
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The weighted response correction of the compensation system can be applied 
to the audible side of either a low or a high frequency broadband or cutoff rejection 
or filter. If done carefully, the perceptual response appears unaltered and can be made 
to sound extended as it was before filtering. Large systems intended to reproduce 
5 high-power, sub-audible or infrasonic energy require a different approach, although 
the same method applies. 

The compensation system combines a loudspeaker model and conjugate 
process to create a zero-phase filter whose acoustic output has low group delay 
distortion. For this application, the peaked response not only complies with the 
10 standard practice but is used in the alignment to help improve group delay and 
becomes part of a hidden compensation that allows the band limiting feature to be 
turned on or off 

When neutrality like that described above is chosen, the compensation system 
can be made to change its cutoff depth and compensating energy with minimum 

15 audibility. This feature allows the compensation system to track or modulate from 
changes of volume control settings, power levels, or program conditions competing 
for perceptual bands. In this manner, the bandwidth restriction can force more power 
to the speaker before distortion sets in. Since audible energy is now rationed a smaller 
amplifier can produce the same playback volume. 

20 These factors have economic importance. Speakers can have parts designed 

so that the system can benefit from the compensation system. They would have 
shorter voice coils and lighter- weight cones to produce higher acoustic output firom 
an amplifier. Efficiency is higher, but mechanical behavior is often compromised and 
the acoustic output fi:om such a design tends to rise with frequency. Without 

25 correction the speaker sounds harsh and shrill and therefore must be compensated. 
However, once these changes are corrected by the compensation system, the spealcer 
plays louder, can be smaller, and a lower-powered amplifier can be used. 

If virtual bass extension is chosen, the peaked or compensated response is 
moved in frequency with a carefully worked out strategy. Process settings and the 

30 related acoustic peaking frequency at a band edge becomes dependant on bass content 
of the program material, power reserve of the amplifier, and motion capability of the 
speaker. When playback level is high, and low frequency energy is sfrong, the 
peaking response is moved up in frequency to maintain a reasonable cone motion and 
distortion performance. 
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Most entertainment systems have equalizers, tone controls, and other user- 
operated or initiated features. Acoustic visibility is needed. The compensation system 
works best in tandem with these and can improve their performance. Once the speaker 
system has the more idealized radiation behavior provided by the compensation 
5 system, various response leveling systems will not have to sort out or guess which 
■ parts of a measured response taken from a microphone originate from the speaker or 
from the room. The compensation system can more effectively rule out inappropriate 
equalizations from these response leveling programs which might desfroy phase 
response or be inappropriate for other listener positions. Tandem operation also 

10 assures removal of distracting mechanical sotmds caused by responses that are 
unidentifiable by traditional methods. Human binaural perception is good at 
perceiving, recognizing, and localizing these sounds. Once they are removed, the 
traditional equalization methods can boost high frequencies without added harshness, 
and low frequencies without box boom or muddy soxmds characteristic of minimal 

15 construction. 

For the compensation system, specialized analog functional block circuits can 
make simple practical systems. Response ranges for their adjustable parts can be 
predicted from the conjugate model so that parallel signal paths and multiple shared 
functions are possible. Much fewer active devices are needed in a signal path, thereby 

20 reducing costs and distortion. Some time-related correction is possible from all-pass 
filters but other delay operations are impractical. 

Exemplary analog and DSP implementations of the compensation system in 
a loudspeaker context are provided in appendices B and C, respectively. Descriptions 
of other applications of the compensation system follow. 

25 Communication System - Communication systems can be subj ect to unwanted 

narrow-band noise or tones at fixed or varying frequency. Quite often some time 
latency is available allowing a subsystem to identify and track such tones. When it is 
not practical or possible to create an out-of-phase signal to remove the disturbance the 
compensation system achieves an effective result. Frequently, it is possible to track 

30 the disturbance with the parametrically moveable weighted response notch. Unless 
an intelligence signal has the same frequency as the one being rejected, the correction 
will be effective yet not degrade or change the sound. Frequently, communication 
systems have fransducers such as microphones, headphones, and speakers as part of 
the sound reproduction system. These elements could have undesirable responses that 



33 PACIF-55288 

can be compensated individually, or collectively as a system. One or more processors 
can be placed anywhere in the signal chain. They can be controlled or programmed 
to compensate a multitude of component part mixes, such as transducers, signal paths, 
human hearing requirements, and the like. To set up such a system, control parameter 
5 information may be identified or accessed by hidden codes in the signal path. 
Auxiliary channels, as well as other means, can be used to convey this information. 
Since the compensation system uses this information efficiently to create very 
complex responses, the correction process can be installed in many systems. 
Examples include computer speakers, telephone systems for hearing impaired, and 

1 0 mobile communications. For these systems, the processors can be external or not part 
of the end user appliance. Hence, the compensation system can be programmed to a 
particular model of apphance and externally activated. Part, all, or none of the 
processor can reside with the appliance. 

Hearing Aid - Many hearing difficulties arise firom damage to hair cells within 

1 5 the auditory nerve. Frequently people suffer tinitus or head ringing, and have difficult 
understanding conversations in crowded noisy rooms. Sometimes a closely spaced 
group of cells corresponding to a narrow fi-equency band has had mechanical damage 
causing an excessive nerve response to high intensity stimulus. This action often 
sounds discordant and painful. It may cause disruption to a hearing feedback path to 

20 and from the brain, so as to initiate premature protection functions, thereby 
aggravating the unpleasant sensation. Since the stimulus causing the mechanical 
motion is in a range of frequencies easily defined by medical test routines, the 
parametric weighted notch filter can be easily tuned to the same frequencies to block 
sound fransmission that excites these cells. If the additive weighting is set up properly 

25 for the individual the perceptual loss to other sounds is reduced. In a typical situation 
the notch must have a band reject characteristic which may have to become wider with 
sound pressure level. The compensating side energy tracks these changes to reduce 
the intelligibility loss to other sounds. A system designed to perform this correction 
can be more effective and its specialized processing might take up less battery power 

30 than general-purpose response contouring methods. 

Watermark Identification — A recording can be made with known frequencies 
removed by a sharp notch. If the same recording needs to be identified later a system 
can be made to search for the known missing frequencies. One can expect flutter, 
noise, and unpredictable clock rates to shift dead bands and to create a multitude of 
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difficulties. A recording may use music signals to define operating frequencies and 
timing of encoded security notches. Clock dependency is reduced and number keys 
are used to prevent someone ft-om finding these frequencies and altering their purpose. 
During playback, key identified parts of the program initiate decoding parameters used 
5 for verification. Like the communication system previously described, the recorded 
notch should be silent or hidden as best as possible and it is likely to jump from one 
frequency to another. The parametrically controlled weighted compensation method 
is ideal for this application, and the combination of keyed frequency jumping and 
hiding provides for an effective security system. 

10 Feedback Elimination from Sound Systems - Large sound reinforcement 

installations, phones, and other systems involving the simultaneous acquisition and 
reproduction of sound are subject to feedback. Usually, a microphone picks up some 
part of a reproduced acoustic signal and adds to the signal to cause oscillation. 
Sophisticated DSP parts of speaker phones can sort out room echoes and phase 

15 relationships of cross talk to clarify sound transmission and eliminate feedback. 
Frequency shifters randomize feedback phase to prevent a slow buildup of howl or 
high-Q loose-coupled oscillation. Sometimes, the latency from these methods 
interferes with stage performance or synchronization. Tunable weighted notches can 
be set to sensitive frequencies to eliminate oscillation without significant loss to 

20 sounds. Double or multiple-tuned versions have little interaction with each other, and 
the inherent dead band makes tuning out feedback much easier. 

CD Player - A typical electronic system, operating in either the digital or 
analog domain (or both), might combine intentional user adjustments and the 
compensation system. Parts descriptions, mathematical models, measured data, and 

25 human preference information may be combined and incorporated into its design. 
Once parameters are defined and their coefficient values are determined an organized 
group of numbers can program an electrical or mathematical system to perform 
specific correction response for different shapes and sizes of loudspeakers. The 
parameter list, and even the individual correction modules, can be downloaded to a 

3 0 digital signal processor in a CD player or other device. This operation can be done at 
any time, so that it provides a programmable upgrade. It can be activated by bar code, 
remote control, downloaded from a computer, or installed to dedicated player/speaker 
combinations. 



35 PACIF-55288 

While several particular forms of the invention have been illustrated and 
described, it will be apparent that various modifications can be made without 
departing from the spirit and scope of the invention. 



WHAT IS CLAIMED IS: 
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1 . An apparatus for modifying an electrical audio signal for input to a 
sonic reproduction device characterized by a plurality of individual responses which 
in combination define an overall response for the sonic reproduction device, each 
individual response comprising at least one of a frequency, time, phase or transient 

5 response, said apparatus comprising: 

a plurality of modification filters having modification responses that simulate 
the plurality of individual responses, the modification filters for receiving the 
electrical audio signal, modifying the electrical audio signal and providing the 
electrical audio signal to the sonic reproduction device; and 
10 a plurality of adjustable parameters, each associated with at least one of the 

modification filters for allowing adjustments to the responses of the modification 
filters; 

wherein the adjustments create a plurality of individual conjugate responses, 
each individual conjugate response associated with at least one of the plurality of 
15 individual responses. 

2 . The apparatus of claim 1 wherein the plurality of individual responses 
of the sonic reproduction device are related to at least one of mechanical, acoustic and 
electromagnetic behavior of the sonic reproduction device. 

3. The apparatus of claim 1 wherein the filters are defined by digital 
signal processes. 

4. The apparatus of claim 1 wherein the filters are defined by analog 
circuitry. 

5. The apparatus of claim 1 wherein the plurality of modification filters 
are non-interacting. 

6. The apparatus of claim 1 wherein the plurality of modification 
responses combine to form an overall response that is a conjugate to the overall 
response for the sonic reproduction device. 
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7. The apparatus of claim 1 wherein at least one of the modification filters 
comprises a cut-off filter and the parameters for adjusting the frequency response of 
the cut-off filter comprise peak frequency, amplitude and Q parameters. 

8. The apparatus of claim 7 wherein the peak firequency, amplitude and 
Q parameters modify the frequency response of the cut-off filter in at least one of the 
low and high fi-equency ranges. 

9. The apparatus of claim 1 wherein at least one of the modification filters 
comprises a constant slope equalizer and the parameters for adjusting the firequency 
response of the constant slope equalizer comprise crossover frequency and boost shelf 
parameters. 

10. The apparatus of claim 9 wherein the crossover frequency and boost 
shelf parameters modify the frequency response of the constant slope equalizer in at 
least one of the low and high frequency ranges. 

1 1 . The apparatiis of claim 1 wherein at least one of the modification filters 
comprises a parametric notch filter and the parameters for adjusting the frequency 
response of the parametric notch filter comprise notch frequency, amplitude and Q 
parameters. 

12. The apparatus of claim 1 wherein at least one of the modification filters 
comprises a parametric notch-boost filter and the parameters for adjusting the 
frequency response of the parametric notch-boost filter comprise notch frequency, 
amplitude and Q parameters. 

13. A sound compensation system for altering an electrical audio signal for 
input to a sonic reproduction device having associated behavioral characteristics, said 
system comprising: 

a model of the sonic reproduction device having a plurality of filters that 
simulate at least one of the behavioral characteristics of the sonic reproduction device, 
each filter having an associated response that combine to define an overall response 
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for the model, each response comprising at least one of a frequency, time, phase or 
transient response; and 

a controller that modifies the response of each of the plurality of filters to 
transform the filter into a conjugate filter having a responses that is a conjugate to the 
original response of the filter. 

14. The system of claim 13 wherein the behavioral characteristics are 
defined by individual components of the sonic reproduction device 

15. The system of claim 13 wherein the behavioral characteristics are 
defined by groups of individual components of the sonic reproduction device 

16. The system of claim 13 wherein the filters are defined by digital signal 
processes and the controller comprises a computer 

17. The system of claim 13 wherein the filters are defined by analog 
circuits and the controller comprises adjustable circuit components 

18. The system of claim 13 wherein the sonic reproduction device 
comprises a speaker and at least one of the plurality of filters comprises at least one 
associated adjustable parameter and the value of the parameter is calculated based on 
physical characteristics of the spealcer. 

19. The system of claim 18 wherein the physical characteristics of the 
speaker comprises at least on of cone and coil mass, air volume, mechanical 
comphance, radiating area, damping, moving mass and motor characteristics. 

20. The system of claim 13 wherein the sonic reproduction device 
comprises a speaker and at least one of the plurality of filters comprises at least one 
associated adjustable parameter and the value of the parameter is derived from a 
standard speaker model. 
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21 . The system of claim 13 wherein at least one of the plurality of filters 
has at least one associated adjustable parameter and the value of the parameter is 
determined experimentally using standard test measurements. 

22. The system of claim 13 wherein the controller is configured such that 
an adjustment in the setting of one parameter modulates the setting of at least one 
other parameter. 

23. The system of claim 22 wherein the sonic reproduction device 
comprises a speaker and the one parameter that modulates the at least one other 
parameter relates to the magnet structure and voice coil of the speaker. 

24. The system of claim 13 wherein the controller monitors the program 
conditions at the sonic reproduction device and sets at least one of the parameter 
values based on the program conditions. 

25. The system of claim 24 wherein the program conditions comprise at 
least one of volume control settings, program level and bass content. 

26. The system of claim 1 3 wherein one of the filters comprises a weighted 
compensation notch filter. 

27. The system of claim 26 wherein the filter comprises a single-tuned 
weighted compensation notch. 

28. The system of claim 26 wherein the filter comprises a double-tuned 
weighted compensation notch. 

29. A sound system comprising: 

a sonic reproduction device having associated mechanical, acoustic and 
electromagnetic behavioral characteristics; 

a source for outputting an electrical audio signal to a model of the sonic 
reproduction device, the model having a plurality of filters that simulate at least one 
of the mechanical, acoustic and electromagnetic behavioral characteristics of the sonic 
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reproduction device, each filter having an associated response comprising at least one 
of a frequency, time, phase or transient response, the model outputting the electrical 
audio signal to the sonic reproduction device; and 

a controller that modifies the responses of the filters to transform the model 
into a conjugate model having a plurality of filters with responses that comprise 
conjugates to the original response of the filter. 



30. The system of claim 29 wherein the filters are defined by digital signal 
processes. 



3 1 . The system of claim 29 wherein the filters are defined by analog 
circuitry. 



32. The system of claim 29 wherein the plurality of filters are non- 
interacting. 



33. The system of claim 29 wherein at least one of the filters comprises a 
cut-off filter and modifications to the frequency response of the cut-off filter comprise 
adjustments to peak frequency, amplitude and Q. 



34. The system of claim 29 wherein at least one of the filters comprises a 
constant slope equalizer and modifications to the frequency response of the constant 
slope equalizer comprise adjustments to crossover frequency and boost shelf. 



35. The system of claim 29 wherein at least one of the filters comprises a 
parametric notch filter and modifications to the jfrequency response of the parametric 
notch filter comprise adjustments to notch frequency, amplitude and Q. 

36. The system of claim 29 wherein at least one of the filters comprises a 
parametric notch-boost filter and modifications to the frequency response of the 
parametric notch-boost filter comprise adjustments to notch frequency, amplitude and 

Q- 
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37. A method for modifying an electrical audio signal for input to a sonic 
reproduction device characterized by a plurality of individual responses which in 
combination define an overall response for the sonic reproduction device, each 
individual response comprising at least one of a frequency, time, phase or transient 
5 response, said method comprising the steps of: 

simulating the plurality of individual responses with a plurality of filters; 

adjusting the responses of the plurality of filters such that, for each filter, the 
adjusted response comprises a response that is a conjugate to one of the individual 
responses; 

10 inputting the electrical audio signal to the filters. 

3 8 . The method of claim 3 7 wherein the plurality of individual responses 
of the sonic reproduction device are related to at least one of a mechanical, acoustic 
and electromagnetic behavior of the sonic reproduction device. 

39. The method of claim 37 wherein the plurality of filters are non- 
interacting. 

40. The method of claim 37 wherein the plurality of adjusted responses 
combine to form an overall response that is a conjugate to the overall response for the 
sonic reproduction device. 

41. The method of claim 37 wherein at least one of the filters comprises 
a cut-off filter and the step of adjusting the fi-equency response of the cut-off fiher 
comprises the step of setting at least one of peak frequency, amplitude and Q. 

42. The method of claim 37 wherein at least one of the filters comprises 
a constant slope equahzer and the step of adjusting the frequency response of the 
constant slope equalizer comprises the step of setting at least one of crossover 
frequency and boost shelf. 

43. The method of claim 37 wherein at least one of the filters comprises 
a parametric notch filter and the step of adjusting the frequency response of the 
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parametric notch filter comprises the step of setting at least one of notch frequency, 
amplitude and Q. 

44. The method of claim 37 wherein at least one of the filters comprises 
a parametric notch-boost filter and the step of adjusting the frequency response of the 
parametric notch-boost filter comprises the step of setting at least one of notch 
frequency, amplitude and Q. 

45. A method of altering an electrical audio signal for input to a sonic 
reproduction device having associated behavioral characteristics, said method 
comprising the steps of: 

simulating at least one of the behavioral characteristics of the sonic 
5 reproduction device with aplurality of filters, each filter having an associated response 
comprising at least one of a frequency, time, phase or transient response; and 

for each of the filters, modifying the response of the filter to transform the 
filter into a conjugate filter having a response that comprises a conjugate to the 
original response of the filter. 

46. The method of claim 45 wherein the behavioral characteristics are 
defined by individual components of the sonic reproduction device. 

47. The method of claim 45 wherein the behavioral characteristics are 
defined by groups of individual components of the sonic reproduction device. 

48. The method of claim 45 wherein the sonic reproduction device 
comprises a speaker and at least one of the plurality of filters has at least one 
associated adjustable parameter and the step of modifying the response of the filter 
comprises the steps of: 

5 calculating the value of the at least one adjustable parameter value based on 

the physical characteristics of the speaker; and 

setting the parameter to the calculated value. 
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49. The method of claim 48 wherein the physical characteristics of the 
speaker comprises at least on of cone and coil mass, air volume, mechanical 
compliance, radiating area, damping, moving mass and motor characteristics. 

50. The method of claim 45 wherein the sonic reproduction device 
comprises a speaker and at least one of the plurality of filters has at least one 
associated adjustable parameter and the step of modifying the response of the filter 
comprises the steps of: 

5 deriving the at least one adjustable parameter fi-om a standard speaker model; 

and 

setting the parameter to the derived value. 

5 1 . The method of claim 45 wherein at least one of the plurahty of filters 
has at least one associated adjustable parameter and the step of modifying the response 
of the filter comprises the steps of: 

determining the at least one adjustable parameter experimentally using 
5 standard test measurements; and 

setting the parameter to the determined value. 

52. The method of claim 48, 50 or 51 further comprising the step of 
modulating the setting of at least one parameter in response to the setting of another 
parameter. 

53 . The method of claim 48, 50 or 5 1 further comprising the steps of: 
monitoring at least one program condition at the sonic reproduction device; 

and 

setting at least one of the parameter values based on the at least one program 
condition. 

54. The method of claim 53 wherein the program conditions comprise at 
least one of volume control settings, program level and bass content. 



44 PACIF-55288 
ABSTRACT OF THE DISCLOSURE 



A sound compensation system alters an electrical audio signal for input to a 
sonic reproduction device having associated behavioral characteristics. The 
behavioral characteristics of the device are defined by individual or groups of 
individual components of the sonic reproduction device and include mechanical, 
acoustic and electromagnetic behaviors. The model includes a plurality of filters that 
simulate at least one of the behavioral characteristics of the sonic reproduction device. 
The filters are defined by digital signal processes or by analog circuits and are 
characterized by one or more of an associated frequency, time, phase and transient 
response. These responses combine to define an overall response for the model. The 
filters include adjustable parameters which are used to alter filter responses to produce 
responses that are conjugates to the responses of the imaltered filters and thus the 
sonic reproduction device. A controller modifies the parameters. 
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APPEM)IX A 



FIGS. Al, A2 and A3 show possible implementations for the low-pass filter 
(Lp) and the high-pass filter (Hp) cut-off filters. The order of these particular filters is 
kept small to support a low-MIPS implementation. FIG. A4 shows a possible 
implementation for the high and low shelving equalizers. These equalizers are used 
for Lg and Hg. FIG. A5 shows a parametric equalizer implementation usable for boost 
or cut applications. Combinations of such equalizers can be combined, as shown in 
FIGS. A6 and A7, to build the compensated notch effect. 
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Digital Low-Pass RIter Implementation #1 



Define sampling frequency 
Fs :=4410C 
Define cutoff frequency 
Fc := 140OC 

Normalized cutoff frequency 
Fc 

fc :=2-_ 
Fs 

fc = 0.635 
Define Fitter Q 



G(x) 




5000 



q :=10 

q 



Define Filter Parameters 



arg(gain(D,x)) 0 



F:=2-sin^fc-^ 
F= 1.68 

2 

A = 1.411 
B:=A 

Define Transfer Function (1st column is numerator coefficients in transfer function 
and 2nd column is denominator coefficients in transfer function). So tfiis filter is a 2nd 
order IIR. 




D:= 



D = 



B 1 

B -(2-F-Q-F^) 
0 (l-F-Q) 

1.411 1 
1.411 0.991 
0 0.832 



Plot frequency and phase response of the filter 
x:= 0,-001.. .5 
G(x) :=1 gain(D,x) | 



FIG. Al 



DIoHal Hl-Pass Filter #1 



Define sampling frequency 
Fs :=4410C 
Define cutoff frequency 
Fc :=2000 

Normalized cutoff frequency 

o Fc 
fc :=2- — 

Fs 

Define Filter Q 
q;=2 

Q:=i 

q 

Define Filter Parameters 
F:=2-sin|fc-''^ 



A:=- 



G(x) 




arg(gain(D,x)) 



5000 



F = 0.284 
2 

A =0.04 
B:=A 

Define Transfer Function (1st column is numerator coefficients in transfer function 
and 2nd column is denominator coefficients in transfer function). So ttiis filter is a 2nd 
order 1 1 R. 

1 1 



2*107 




D; 



-2 -(2-F-Q-F^) 
1 (1-FQ) 



D 



1 1 
-2 -1.777 
1 0.858 



Calculate gain compensation 
4 



PK: 



K:=. 



(4-2-F-Q-F^ 



1 



PK 

K = 0.909 

Plot frequency and phase response of the filter 

x:=0, .001.. .5 

G(x) :=K-| gain(D,x) | 
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FIG. A2 



Digital Low-Pass Filter Implementation #2 (one-zero) 



Define sampling frequency 

Fs :=441(K; 

Define cutoff frequency 

Fc :=2000 

Normalized cutoff frequency 

fc :=2- — 
Fs 

fc = 0.091 
Define Filter Q 

q := 10 

q 

Define Filter Parameters 
F;=2-sm|fc-'^ 



G(x) 




5000 



X -44 100 



2«10 



arg(gain(D,x)) 



A :=- 



F = 0.284 
2 

A =0.04 
b:=A 

Define Transfer Function (1st column Is numerator coefficients in transfer function 
and 2nd column is denominator coefficients In transfer function). So tfiis filter is a 2nd 
order IIR. 




D:= 



D = 



0 



1 



B -(2-F-Q-F^) 
0 (1-F-Q) 



0 



1 



0.04 -1.891 
0 0.972 



Plot frequency and phase response of the filter 
x:=0,.001.. .5 
G(x) ;=| gain(D,x) | 



FIG, A3 
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Digital Shelving EQ section based on an All-pass filter section 



Define sampling frequency 
Fs :=4410C 
Define critical frequency 
Fc := lOOOC 

Normalized critical frequency 

wc :=2-ji • — 
Fs 

Define gain/cut 

k:=4 

Define Filter parameters 



gamma .= 



tan 



tanl^l-t-l 



\ 2 




Define Transfer Function (1 st column is numerator coefficients in transfer function 
and 2nd column is denominator coefficients in transfer function). So this filter is a 1st 
order MR. 



A:= 



A = 



gamma 1 
- 1 gamma_ 

'0.073 1 
-1 -0.073 



argCgairi( A,x)) 



Plot frequency and phase response of the filter 
x:=0,.0Ol.. 0.5 
G(x) :=| gain(A,x) j 




0 0.1 0.2 0.3 0.4 0.5 

X 

To produce desired parametric EQ embed all-pass section in below structure 

1+K 




In a DSP implementation, the filter output is computed as per the atx>ve signal 
flow. Below we calculate the overall transfer function of the above system by 
transforming the numerator of the all-pass section as necessary. 
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FIG. A4 (Sheet 1 of 2) 
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Digital Notch/Parametric EQ section based on an all-pass section 



Define sampling frequency 
Fs ;=4410C 

Define critical frequency 
Fc;=5500 

Normalized critical frequency 

wc '=2-n • — 
Fs 

Define Filter Q 
Q:=4 

Define gain/cut 
k:=4 

Define Filter parameters 
gamma :=- cos ( wc) 

fbeta ;= 

2Q 

fbeta :=if(fbeta>—,—, fbeta 
1, 4 4 

. l-tan(fbeta) 
beta := i ~ 

l-h tan (fbeta) 

Define Transfer Function (1 st column Is numerator c 
and 2nd column Is denominator coefficients in transt 
order MR. 

beta 1 



G(x) 



argCgain(A,x)) 0 



A := 



A = 



gamma( 1 -i- beta ) gamma-( 1 beta ) 
1 beta 

0.821 1 
-1.29 -1.29 
1 0.821 



0.1 



0.1 



Plot frequency and phase response of ttie filter 
x:=0, .001.. 0.5 
G(x) :=| gain(A,x) \ 

To produce desired parametric EQ tfie all-pass section is embedded in tfie below structure: 

1+K 




in a DSP implementation, tfie filter output is computed as per the above signal 
flow. Below we calculate the overall transfer furrction of the atjove system by 



FIG. A5 (Sheet 1 of 2) 



transforming the numerator of the all-pass section as necessary. 
D:=A 

^ •-'^ extract denominator 

f --u extract numerator 




Magnitude Response: 
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FIG. A5 (Sheet 2 of 2) 
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Digital Implementation of a Weighted Notch #1 



Consists of 3 parametric EQ section designed using the procedure described in 
"Notch/Parametric EQ section based on an all-pass section" 

2 low Q gain section surround the critical frequency notch. 

For compensation section #1 and #2 (Dl and D2 respectively) Q is 2 and k is 1 .6 

resulting in the below transfer functions. The resulting filters are two 2nd order IIR filters where column 0 represents the 
numerator and column 1 represents the denominator. 



Dl := 



1.076 



1 



-1.283 -1.283 
0.619 0.695 



D2 := 



1.089 
- 1.079 
0.554 



I 

-1.079 
0.643 



For critical frequency section #3 (D3 below) Q is 10 and k is 0. The resulting filter is a 2nd order IIR filters where column 0 
represents the numerator and coiurnn 1 represents the denominator. 



D3 := 



0.962 1 
-1.363 -1.363 
0.962 0.925 



Plot of the overall frequency response of the 3 IIR filters cascaded 

x:=0, .001.. 0.5 

Gl(x) :=| gain(Dl,x) | 

G2Cx) :=| gaiii(D2,x) \ 

G3(x) :=| gain(D3,x) j 

H(x) :=20-log(GKx)-G2Cx)-G3(x)) 




FIG. A6 
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Digital Implementation of a Weighted Notch #2 



Consists of 3 parametric EQ section designed using the procedure described in 
"Notch/Parametric EQ section based on an all-pass section" 

One medium Q gain compensation section centered around two notches. 

For compensation section #1 (D1 below) Q is 4 and k is 4 resulting in the below transfer function. The resulting filters is a 
2nd order IIR filters where column 0 represents the numerator and column 1 represents the denominator. 



Dl:= 



1.268 1 
-1.29 -1.29 
0.553 0.821 



For critical frequency notches sections #2 and #3 (D2 and D3 below respectively) Q is 10 and k is 0. The resulting filters 
are two 2nd order IIR filters where column 0 represents the numerator and column 1 represents the denominator. 



D2:= 



0.963 



1 



-1.383 -1.383 
0.963 0.926 



D3:= 



0.962 



1 



-1.343 -1.343 
0.962 0.923 



Plot of the overall frequency resporise of tfie 3 IIR filters cascaded: 

x:=0,.0O0L. 0.5 
Gl(x):=| gain(Dl,x)! 
G2(x) :=i gain(D2,x) j 
G3(x.) :=1 gam{D3,x) | 

H(x) :=20-log(Gl(x)-G2(x)-G3(x)) (cascaded response) 



H(x) -20 - 




-60 



FIG. A7 
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APPENDIX B 



Figure Bl is a block diagram of a compensation system used to compensate 
a small bookshelf speaker having a 5-inch bass driver and 3 -inch tweeter. The speaker 
is characterized as follows: 

Woofer: dome = 4.33 k (notch with LC) 

cone = 4.9 k (compensated notch only) 
edge of cone = 2.8 k (active notch) 

Tweeter: dome = 15. 1 k (no compensation) 
cone cr = 11.6 k (active notch) 
cone cr = 9.32 k / 9.45 k (damp compound) 
Wo = 1.38 k (LCR notch) 

Fourteen adjustments are provided. FIG. B2 shows circuits used to create L^, 
Hj;, Lg, Hg, Lp, and Hp filters and parameters adjustments. A lower frequency cutoff 
peak was added to create response character of an 8 inch bookshelf system. For this 
circuit, Q and peaking amplitude are set by the components marked by square boxes. 
FIGS. B3 and B4 show Wq notch sections and representative tuning for the speaker. 
Wq. . . and |Aj in dB are adjustable, while a resistor set Q. Two groups of these make 
four adjustments. FIG. B5 shows a single low-Q boost. Adjustments for boost and 
frequency are provided by the op amp section. FIG. B6 is an all-pass equalizer used 
for time correction. The all-pass equalizer combines outputs from the six active 
process circuits. 
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APPENDIX C 

A computer adjusted DSP compensator was implemented using a standard PC 
and a Motorola EVM56362 DSP evaluation board. Source code and application notes 
follow. 
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Speaker Tuning Application Note 



The speaker tuning application is written as a Windows OS 32-bit application using the 
object-oriented MFC application framework (please refer to the documentation of MFC 
that is included with Microsoft Visual C++ development environment). The application 
has a dialog interface. The main dialog class, CTabDialog, is a subclass of the MFC 
CDialog class. The CTabDialog class implements a "tabbed" dialog interface. Each tab 
in the dialog is a subclass of the MFC CPropertyPage class. Each tab represents different 
aspects of the speaker correction algoritlim. The following is a list of tab classes: 

• CMainPage which implements UI for pre and post volume controls amongst other 
things 

• CShelvPage which implements UI controls for low and high shelving equalization 
filters 

» CCutoffPage which implements UI controls for low and high peaking cutoff 
filters 

• CNotchPagel and CNotchPage2 which implements UI controls. for a number of 
notch filters (to for example limit resonance in the speaker) 

• CStWaveRejectPage which implements UI controls for a set of filters which can 
limit standing waves in the speaker cabinet 

• CDBNotch which implements UI controls for a double-tuned notch filter 

• CAllpassPage which implements UI for a 2"'^-order allpass filter 

Each adjustable parameter on a tab page is represented by an instance of the CSlider 
class. Each UI slider has a range of 4096 discrete values. When a user manipulates a UI 
slider a message is sent from the tab page to an instance of the CDSP56Manager class. In 
this class, the appropriate calculation takes place to transform the linear input value into 
one or more values necessary to compute the transfer fimction represented by the user 
settings. These computed values are transmitted to the DSP using an I2C serial 
connection. The DSP executes the calculations necessary for the real-time 
implementation of the above-mentioned transfer function. The DSP is capable of 
computing a series of filter calculations in real-time to allow the total cascaded transfer 
function of all the speaker correction filters to be realized. The DSP can receive analog 
or digital input data and transmit processed analog or digital output data. 



Speaker Parameter File Input and Output Logic 



The tab dialog object instance receives 
messages (from the Windows OS) in 
response to user actioa ia the 
application menus 





CTabDiaiog 


V ^ m_AnpassPagQ 
9^m_CxrtojEEPago 
9^ni_DBNotcli 


1 o 


^CTabDialogO 
^ I>iq)layI2CStateO 

DoDataExdiaageO 
90On.aose0 









The user "open" or "save" 
request results in function 
calls to member functioas of 
the CDSP561cManager. 
These calls can restore or 
xetuxa the state of all DSP 
parameters. 




CDSPSgkManager 

£^m_Comm. 
i;(i)m_DSPRetum 

V;;^ m_Raw2DSPVals 
£^mRawVals 



^ CDSP56kManagerO 
;|^CheofcsuitiSRBCO 
^ ComvertBoos^CufRangeO 

CcfflvertFreqRangeO 
- CtBLVerrtQRangeQ 
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I Example of a Property Page UI to DSP connection logic 



The property pages of the 

TabDialog receive 
mapped messages (from 

the Windows OS) in 
response to user actions 





CStWav«RejPage 


^CStWaveRejPageO 
DoDateExchangeO 
9^OnBypass0 
9^ OnIaitDialogO 
t^OnPaintO 
% OnShowWiadowO 
^^OaVScronO 
•^(^SeaadStringToUIO 

^ -CStWaveRgPageO 


o 









Parameter changes causes the 
property pages to call 
member functions of 
CDSP56kManager 



CDSPSOsManager 



£,^m_DSI'Retuni 
j£,^m_DSPVaIs 
£^ m_Raw2DSPVals 
£^ f! m_RawVals 



^ CDSP561cManagerO 
CkeclsimiSRECO 
CcnveitBoostCutRaiigeO 
ConvertFreqRangeO 
¥^ ConvertQRaogeO 



A parameter change causes new 
DSP values to be calculated and 
sent to the DSP via an I2C 
connectioa 

jr,^m_error_code 

Zi^ m_get_det6ct ^ 

^CheckStateO 

^GetDetectStateO 

$I2CIPortCommO 

^IsTransmittingO 

^MessageHandlerQ ^ 



tZCIPortCoinm 

ni_TxReq 
A^m detect 




// COMPortChooser . cpp : implementation file 
// 

Sinclude "stdafx.h" 

#include "sa.h" 

#include "COMPortChooser.h" 

#ifdef _DEBUG 
tdefine aev) DEBUG_NEW 
#undef THIS_FI1E 

static char THIS_FILE[] = FILE ,- 

Sendif 

///////////////////////////////////////////////////////////////////////////// 
// CCOMPortChooser dialog 



CCOMPortChooser : .-CCOMPortChooser (CWnd* pParent /*=HUl.L*/> 
; CDialog (CCOMPortChooser: : IDD, pParent) 

{ 

// { { AFX_DATA_INIT (CCOMPortChooser) 

// NOTE: the ClassWizard will add member initialization here 
//} }AFX_DATA_INIT 

} 



void CCOMPortChooser : :DoDataExchange (CDataExchange* pDX) 
{ 

CDialog : : DoDataExchange (pDX) ,- 
//{ {aFX_DATA_MAP (CCOMPortChooser) 

// NOTE: the ClassWizard will add DDX and DDV calls here 
/ / ) } AFX_DATA_MAP 

} 



BEGIK_MESSAaE_MAP (CCOMPortChooser, CDialog) 

// { {AFX_MSG_MAP (CCOMPortChooser) 

ON_BlI_CLICKED ( IDC_RADI01 , OnRadiol ) 

ON_BN_CI,ICKED { IDC_RAD 102 , Oi-iRadio2 ) 

ON_BN_CLICKED ( IDC_RADI03 , OnRadioS ) 

ON_BN_CLICKED(IDC_RADI04, OnRadio4) 

//) }AFX_MSG_MAP 
END_MESSAGE_MAP { ) 

///////////////////////////////////////////////////////////////////////////// 
/ / CCOMPortChooser message handlers 

void CCOMPortChooser :; OnRadiol () 

// TODO: Add your control notification handler code here 
whichjport = 1; 



void CCOMPortChooser: :OnRadio2 () 

// TODO: Add your control notification handler code here 
which_port = 2; 



void CCOMPortChooser : : OnRadio3 ( ) 

// TODO: Add your control notification handler code here 
which_port = 3 ,- 



void CCOMPortChooser: :0nRadio4 () 

// TODO: Add your control notification handler code here 
which_port = 4; 
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} 

BOOL CCOMPortChooser : : OalnitDialog ( ) 
{ 

CDialog: :OnIn.itDialog ( ) ; 

// TODO: Add extra initialization here 
wb.ioh_port = 3 ; 

return TRUE; // return. TRUE unless you set the focus to a control 
// EXCEPTION; OCX Property Pages should return FALSE 

} 
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// Cutoff Page .cpp : implementation file 
// 



#include "stdafx.h" 

^include "sa.h" 

#include "Cutoff Page . h" 

#include "DSPsekManager .h" 

#ifdef _DEBUG 

#define new DEBUG__NEW 

#undef THXS_FILE 

static char THIS_FILE[] = FIIiE_ 

#endif 



///////////////////////////////////////////////////////////////////////////// 
// CCutoffPage property page 

IMPLEMENT_DYNCREATE (CCutoffPage, CPropertyPage) 

CCutoffPage : : CCutoffPage {) : CPropertyPage (CCutoffPage : : IDD) 
{ 

//{ {afX_DATA_INIT (CCutoffPage) 
/ / } ) AFX_DATA_IN IT 

} 



CCutoffPage: -. -CCutof f Page (> 

{ 

} 



void CCutoffPage: :DoDataExchange(CDataExchange* pDX) 
( 

CPropertyPage: :DoDataExchange (pDX) ; 
//{ {AFX_DATA_MAP (CCutoffPage) 

DDX_Control (pDX, IDC_CHECK;6 , m_BypassSecondButton) ; 

IDC_CHECK5, ni_BypassFirstButton) ; 
rDC_SI.IDERS , m_HiBoostSlider) ; 
IDC_SLIDER5 , 
IDC_SLIDER4 , 
rDC_SI.IDER3 , 
IDC_SL1DER2 , 
IDC SLIDERl, 



DDX_Control (pDX, 
DDX_Coritrol (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control {pDX, 
DDX_Control (pDX, 

//} }afx_data_map 



ra_HiQSlider) ; 
m_HiFreqSlider) ; 
Ta_IjoBoostSlider) ; 
m_LoQSlider) ; 
m_LoFregSlider) ; 



BEGIN_MESSAGE_MAP (CCutoffPage, CPropertyPage) 
//{ {AFX_MSG_MAP (CCutoffPage) 
ON_WM_VSCROLL ( ) 

ON_BN_CLICKED ( IDC_CHECK5 , OnBypassFirst) 
ON_BN_CLICKED { IDC_CHECK6 , OnBypassSecond) 
//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

////////////////////////;//////////////////////////////////////////////////// 
// CCutoffPage message handlers 

BOOL CCutoffPage: rOnlnitDialog {) 
{ 

CPropertyPage: :OnInitDialog () ; 

// TODO: Add extra initialization here 
m_LoFreqSLider . SetRange (0 , COKTROL_RANGE) ; 

n:i_LoFregSlider.SetPos (CONTR0L_RANGE-g_DSPManager- >GetParaniValue (kNotchSFreq) ) ; 
m_l.oFreqSlider . SetTicFreg( (CONTROL_RANGE+l) /16) ; 
m_LoQSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_LoQSlider .SetPos {CONTR0L_RANGE-g_DSPManager->GetParamValue (kNotchSQ) ) ; 
m_LoQSlider . SetTicFr.eq ( {COHTROL_RANGE+l) /IS) ; 
m_LoBoostSlider . SetRange (0 , CONTROL_RANGE) ; 

m_LoBoostSlider . SetPos (CONTR0L_RANGE-g__DSPManager- >GetParaniValue (kNotchSBoost) ) 
m_LoBoostSlider .SetTicFreq( {CONTROI,_RANGE+l) /16) ; 
m_HiFreqSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_KiFreqSlider .SetPos (CONTROIi_RANGE-g_DSPManager- >GetParainValue ()cNotch7Freq) ) ; 
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m._HiFreqSlider.SetTicFreq{ (CONTROL_RANGE+l) /IS) ; 
m_HiQSlider .SetRange (0,CONTROL_RAKGE) ; 

m_HiQSlider.SetPos{CONTROr._RANGE-g_DSPMaaager->GetParainValtie (kHotch7Q) ) ; 
m_HiQSlider.SetTicFreq( {CONTROL_RANGS+l) /16) ; 
m_HiBoostSlider .SetRange ( 0 , CONTROL_RAKGE ) ; 

m_HiBoostSlider .SetPos<CONTROL_RANGE-g_DSPManager->GeCParamValue (kNotchVBoost ) ) 
ra_HiBoostSlider .SetTicFregt (CONTROL_RANGE+l) /16) ,- 

// g_DSPManager->SetCutoEflFreqCCONTROL_RAlJGE-m_LioFreqSlider.GetPos() ) ; 

// g_DSPManager->SetCutoff lQ{CONTROI._RANGE-ra_LoQSlider.GetPos () ) ; 

// g_DSPManager->SetCuto£flBoost (CONTROL_RANGE-m_LoBoostSlider -GetPos {) ) ; 

// g_DSPManager->SetCutoff2Freq(C0NTR0L_RANGS-in_HiFreqSlider .GetPos 0 ) ; 

// g_DSPMaiiager- >SetCutoff2Q(C0NTR0L_RANGE-ra_HiQSlider. GetPos () ) ; 

// g_DSPManager->SetCutoff2BoosC(CONTROL_RAMGE-m_HiBoosCSlider. GetPos 0 ) ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

1 

void CCutoff Pager :OnVScroll {UINT nSBCode, UIKT nPos, CScrollBar* pScrollBar) 
{ 

// TODO: Add your message handler code here and/or call default 
CPropertyPage: :OnVScroll (nSBCode, nPos, pScrollBar) ; 
Sleep (50) ; 

if{ (CSliderCtrl *) pScrollBar == &m_LoFreqSlider ) 

g_DSPManager->SetCutofflFreq(CGNTROL_RANGE-m_LoFregSlider. GetPos 0 ) ; 
else if ( (CSliderCtrl *) pScrollBar == &ttv_LoQSlider ) 

g_DSPManager->SetCutofflQ(CONTROL_RAKGE-m_LoQSlider. GetPos 0 ) ; 
else if ( (CSliderCtrl *} pScrollBar =- S:m_LoBoostSlider ) 

g_DSPMaaager->SetCutof flBoost (CONTROL_RANGE-m_LoBoostSlider. GetPos () ) ; 
else if ( (CSliderCtrl *) pScrollBar == &m_HiFreqSlider ) 

g_DSPKanager->SetCutof f2Freq<C0KTR0L_RANGE-m_HiFreqSlider. GetPos () ! ; 
else if ( (CSliderCtrl *)pScrollBar == &m_HiQSlider ) 

g_DSPManager->SetCutoff2Q(CONTROL_RMJGE-m_HiQSlider. GetPos () ) ; 
else if { (CSliderCtrl *)pScrollBar == &m_HiBoostSlider ) 

g_DSPManager->SetCutoff2Boost (CONTROL_RANGE-m_HiBoostSlider .GetPos ( ) ) ; 

} 

void CCutoff Page: lOnBypassFirst () 
( 

// TODO: Add your control notification handler code here 
int state = m_BypassFirstButton.GetState () £ 0x3; 

g_DSPManager->SetBypassSeotion{state,kBypassHipass) ; 

) 

void CCutoffPage: :OnBypass Second () 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassSecondButton.GetState {) & 0x3; 

g_DSPManager->SetBypassSection <state, kBypassLopass) ; 

} 
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#i£ ; defined (AFX_COMPORTCHOOSER_H B5D510E7_F7D5_11D2_96EE_0 06097CDB9E2 INCLUDED_) 

Sdefine AFX COMPORTCHOOSER H B5D5I0E7 F7D5 11D2 96EE 00S097CDB9E2 INCLODED_ 

#if _MSC_VER >= 1000 
Spragma once 

#endif // _MSC_VER >= 100 0 

// COMPortChooser .h : header file 

// 

///////////////////////////////////////////////////////////////////////////// 
// CCOMPortChooser dialog 

class CCOMPortChooser : public CDialog 
{ 

/ / Construction 
public: 

CCOMPortChooser (CWnd* pParent = WJhli) ; // standard constructor 

int which_port; 

// Dialog Data 

//{ {AFX_DATA (CCOMPortChooser) 
enum { IDD = IDD_DIAL0G3 } ; 

// NOTE: the ClassWizard will add data members here 
//})AFX_DATA 



// Overrides 

// ClassWizard generated virtual function overrides 

// { {AFX_VIRTUAL (CCOMPortChooser ) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
// } }AFX_VIR'rUAL 

// Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG (CCOMPortChooser) 

afx_msg void OnRadiol () ; 

af x_msg void OnRadio2 < ) ,- 

afx_msg void OnRadio3(); 

afx_t!isg void OnRadio4() ; 

virtual BOOL OnlnitDialog () ,- 

// } }afx_msg 

DECLARE_MESSAGE_MAP { ) 

); 

// ( {afx_insert_i«cation } } 

// Microsoft Developer Studio will insert additional declarations itnrtiediately before the previous line. 
#endif // ! defined {AFX_COMPORTCH DOS ER_H B5D510E7_P7D5_11D2_96EE_OOS097CDB9E2 INCLUDED ) 
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#if !defineci(AFX_CUTOFFPAGE_H_SFlS162S_D84D_llD2_95EE_00S097CDB9E2 INCLUDED ) 
#define AFX_CUTOFFPAGE_H__6F151S25_D84D_11D2_96EE_006097CDB9E2_INCLUDED_ 

#if _MSC_VER >= lOOO 
#pragina once 

#endif // _MSC_VER >= 10 QO 
// Cutoff Page. h : header file 
// 



// CCutoffPage dialog 

class CCutoffPage : public CPropertyPage 

DECLARE_DYNCREATE (CCutoffPage) 

// Construction 
public : 

CCutoffPage () ; 

-CCutof f Page () ; 

// Dialog Data 

//{ {AFX_DATA {CCutof f Page) 
enum { IDD = IDD_PP7 } ; 
CButton ra_BypassSeGoiidButton; 
CButton m_BypaEsFirstButton; 
CSliderCtrl m_HiBoostSlider ; 
CSliderCtrl ra_HiQSlider; 
CSliderCtrl m_HiFregSlider ; 
CSliderCtrl m_LoBoostSlider ; 
CSliderCtrl m_LoQSlider ,- 
CSliderCtrl m_LoFreciSlider ; 
//}}AFX_DATA 



// Overrides 

/ / Classwizard generate virtual function overrides 

/ / { {AFX_VIRTUAL (CCutoffPage) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
// } } AFX_VIRTUAL 

// Implementation 
protected: 

/ / Generated message map functions 

/ / { { AFX_MSG < CCuto f f Page ) 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos , CScrollBar* pScrollBar) • 
afx_msg void OnBypassFirst ( ) ; 
afx_Tiisg void OnBypassSecond C) ; 
//} )afx_msg 
DECLARE_MESSAGE_MAP { ) 

}; 

/ / { {afx_insert_location} } 

// Microsoft Developer Studio will insert additional declarations itmnediately before the previous line. 
#endif / / ! def ined(AFX_CUTOFFPAGE_H_6F151625_D84D_llD2_96EE_00S097CDB9E2_lNCLUDED_) 
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#if !defined(AFX_ALLPASSPAGE_H F47S7B24_11B3_11D3_9SEE_006097CDB9E2 INCLUDED ) 

#define AFX_ALLPASSPAGE_H_F4767B24_X1B3_11D3_96EE_006097CDB9E2_INCUJDED 

#if _MSC_VER >= 100 0 
#pragnia once 

#endif // _MSC_VER >= lOOO 

// AllpassPage.h : header file 

// 



iiiiiiii/niii/ii/iinf/iiinn/i/ni/iini/ui/ii/iiin/iiu[//ii/jf,j//i,/, 

It CAllpassPage dialog 
class CTabDialog; 

class CAllpassPage : public CPropertyPage 

DECLARE_DYNCREATE (CAllpassPage) 

// Construction 
public : 

CAllpassPage () ; 

-CAl Ipa s s Page ( ) ; 

// Dialog Data 

//{ {AFX_DATA (CAllpassPage) 
enum { IDD = IDD_PP10 ) ; 
CButton m_BypassButton; 
CSliderCtrl m_QSlider; 
CSliderCtrl m_Frequ6ncySlider 
//} }AFX_DATA 



// Overrides 

/ / ClassWizard generate virtual function overrides 
//{ {AFX_VIRTUAL (CAllpassPage) 
protected : 

virtual void DoDataExchange (CDataExchange* pDX) ,- // ddx/DDV suDDort 
//} }AFX_VIRTUAL ^ 

II Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG(CAllpaBsPage) 

afx_msg void OnBypass{); 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pSorollBar) • 
afx_msg void OnPaintO; 
//}}AFX_MSG 
DSCLARE_MESSAGE_MAP { ) 

CTabDialog *m_ParentWindow; 
void SendStringToUI (int which); 



}; 

//{ {afx_insert_location} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line 
#endif // !defined(AFX_ALLPASSPAGE_H_F47S7B24_llB3_llD3_96EE_006097CDB9E2 INCLUDED ) 
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// AllpassPage.cpp : implementation file 
// 

#include "stdafx.h" 

# inc lude " sa . h " 

#include "AllpassPage .h" 

^include "TabDialog .h" 

#include "DSP56kManager.h" 

#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE[j = FILE ; 

#endif 

1 1 1 1 1 11 1 u 1 1 If / 11 1 / 11 1 1 1 1 n / n f ij t / n / 1 1 ij I / J 1 1 1 J f u I n 1 1 n / / 1 m 1 1 / n I m li / 

II CAllpassPage property page 

IMPLEMENT_DyNCREATE (CAllpassPage, CPropertyPage) 

CAllpassPage : : CAllpassPage ( ) : CPropertyPage (CAllpassPage : : IDD) 

// { {AFX_DATA_INIT (CAllpassPage) 
//}}AFX_DATA_INIT 

} 



CAllpassPage: ; -CAllpassPage () 

{ 

} 

void CAllpassPage: :DoDataExchange (CDataExchange* pDX) 

CPropertyPage: :DoDataExchange {pDX> ; 
//{ {AFX_DATA_MAP (CAllpassPage) 

DDX_Control (pDX, IDC_CHECK1, m_BypassButton) ; 
DDX_Control (pDX, IDG_SIiIDER3 , m_QSlider) ; 
DDX_Coutrol (pDX, IDC_SLIDER1 , m_Frequen.cySlider) • 
/ / } } AFX_DATA__MAP 



BEGIN_MESSAGE_MAP (CAllpassPage, CPropertyPage) 

//{ {AFX_MSG_MAP (CAllpassPage) 

ON_BN_CI.ICKED (IDC_CHECK1, OnBypass) 

OH_WM_VSCROLI, { ) 

ON_WM_PAINT(} 

/ / } } AFX_MSG_MAP 
END_MESSAGE_MAP { ) 

^'/'JJ'f''f''''f'/'/'/l'll'/llll'lllllllllllllllliliiiii//jfuiuji/illliiili 

II CAllpassPage message handlers 

void CAllpassPage :: OnBypass {) 

// TODO: Add your control notification handler code here 
int state = m_BypassButton.GetState() & 0x3; 

g_DSPManager- >SetBypas sSect ion ( state , kBypas sAl Ipas s ) ; 

} 

BOOL CAllpassPage: :OnInitDialog{) 

CPropertyPage: :OnInitDialog () ; 

// TODO: Add extra initialization here 
m_PreguencySlider.SetRange (0, CONTROIi_RANGE) - 

m_FreguencySlider.SetPos(CONTROL_RANGE-g_DSPManager->GetParamValue(kAllpassFreq)) 
tn_FrequencySlider. SetTicFreg{ (CONTROL_RANGE+l) /16) ; 
ra_QSlider . SetRange (0 , CONTROL_RANGE ) ; 

'"-Sf^^2^'''^^''^°^ (C0NTROL_RANGE-g_DSPManager->GetParamValue (JcAllpassQ) ) ■ 
m_QSlider.SetTicFreqC(CONTROL_RANGE+l)/lS) ; 
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ni_ParentWindow = (CTabDialog *) Ge C Parent ()- >Get Parent () ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

1 

void CAllpassPage-. :OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 
{ 

// TODO: Add your message handler code here and/ or call default 
CSliderCtrl *slxder = (CSliderCtrl *)pScrollBar; 
int which; 

CPropertyPage : :OnVScroll (nSBCode, nPos, pScrollBar) ; 

.Sleep (50) ; 
if ( slider == &r[v_Freo[uencySlider ) 

which = kAllpassFreg; 
else if { slider == &m_QSlider ) 

which = kAllpassQ; 
else 

return; 

g_DSPManager- >SetParamValue {CONTROL_RANGE- slider- >GetPos ( ) , which) ; 
SendStringToUI (which) ; 

} 

void CAllpassPage: : SendStringToUI (int which) 
{ 

CString str; 

g_DSPManager->GetStringValue (which, str] ; 
m_ParentWindow->SetStatusString (0 , str) ; 

} 



void CAllpassPage : :OnPaint {) 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_PrequencySlider.SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kAllpassFreq) ) 
m_QSlider.SetPos {CONTROL_RANGE-g_DSPManager->GetParamValue (IcAllpassQ) ) ; 
™_BypassButton.SetCheck(g_DSPManager->GetEypassSection(kBypassAllpass) ) ; 

//Do not call CPropertyPage : :OnPaint {) for painting messages 

} 
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// DSPCoinm.h: interface for the DSPCoram class. 
// 

f////////J///// J /// I/////////////////// ////////////////////// f //////// 

#if !defined<AFX_DSPCOMM_H_33F9EF05_F6EF_llD2_96EE_006097CDB9E2 INCLUDED ) 
#define AFX_DSPCOMM_H_33F9EF05_FSEF_llD2_9eEE_00S057CDB9E2_INCLUDED_ 

(fif _MSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 

class DSPComm 
{ 

public : 

virtual BOOL Is Transmit ting ( ) ; 

virtual long GetDetectState (void) ; 

virtual BOOL CheckState {void) ; 

virtual long SendDS PMeraory ( char *, long) ; 

virtual long SendDS PWord (long) ; 

DSPComm () ; 

virtual -DSPConm ( ) ; 

}; 

«endif // !defined{AFX_DSPCOMM_H_33FSEF05_F5EF_llD2_96HE_O06097CDB9E2 INCLUDED_) 
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// DSPComm.cpp: implementation of the DSPComm class. 
// 

uf/i//ij/uf/ii/m/f//i//in/f//i!/i/////j///[/ifi/ii//[//jt//f//,// 

#include "stdafx.h" 
#include "sa.h" 
#include "DSPComm. h" 

Sifdef _DEBUG 
#undef THIS_FILE 

static char THIS_FILE[]= FILE 

#define new DEBUG_NEW 
#endif 

////////////////////////////////////////////////////////////////////// 
// Construction/Destruction 

iiifiiiiiiiiiiiiiii!ii!iii!iinii/ii/iiiiiniiiiiiiiiiinuiiiiiijiiii 

DSPComm: iDSPCorrati ( ) 
{ 

} 

DSPConim: : -DSPComm () 
{ 

) 

long DSPCoTmi: : SendDSPWord (long) 



return ( OL ) ,- 

} 

long DSPComir,: :SendDSPMemory(char *data, long len) 



return ( OL ) ; 

} 

BOOI. DSPComm: :CheckState () 
{ 

return { true ) ; 

) 

long DSPComm: :GetDetectState 0 
{ 

return ( OL ) ; 

} 

BOOL DSPComm: : IsTransmitting 0 



return ( false ) ; 

} 



1 



0015 



// DSPSSkManager.hi interface for the CDSPSSkManager class. 
// 

lllllllllll/lllll/lll/lllll/lliiiiiiiijiiiuiiiiii/iiiiiiiiii,,i,,,,,i 

</if !def ined(AFX_DSP5SKMANAGER_H__OCF7E204_D790_llD2_96EE_Oa6097CDB9E2 INCLUDED 

^define AFX_DSP56KHANAGER_H OCF7E204_D790_11D2_9SEE_006097CDB9E2 INCLUDED_ 

*if _HSC_VSR >= 1000 
^pragma once 

fiendif // _MSC_VER >= 1000 

^include "DSPSSEquates .h" 
Sinclude "DSPComm.h" 

#define C0NTR0L_RANGE_L2 12 

iJdefine CONTROL_RANGE ( (1L<<CONTROL_RANGE_L2 ) - 1) 

#define PG_CONTROL_AMT (CONTROL_RANGE/64 ) 

#define CONTROL_RANGE_SC (23 -CONTROL_RANGE_L2 ) 

#define DSP_CONTROL_MAX 8388508. 

class CDSPSSkManager 
{ 

long ■m_DSPReturn; 

long m_Raw2DSPVals [kUIArraySize] ; 
long m_RawVals [kUIArraySize] ; 
long m_DS PVal s [ kDS PArrayS i ze 3 ; 
double m_jpi; 
DSPCornm *ra_Coinm; 

public: 

void GetPureStringValue Cint which, CString &str) ; 

void GetFilterBlob {CStringArray &array} ; 

virtual BOOL GetBypassSection (int which); 

virtual void SetBypassSect ion (BOOL value, int which); 

virtual BOOL IsBusyO; 

virtual void GetStringValue (int which, CString &str) ; 

virtual BOOL IsReady (void) ; 

virtual void SetAnaloglnput (long) ; 

virtual int GetHDCDMode (void) ; 

virtual void ResetAll (void) ; 

virtual void SetHDCDGainScale (long) ; 

virtual void SetHDCDSypass ( long) ; 

virtual void SetDDXCompBypass (long) ; 

virtual void SetBypass (long value); 

virtual void GetDSPSettings (CStringArray Jiarray) ; 

virtual void SetDSPSettings (CStringArray &array) ; 

virtual void SetParamValue (long value, long which); 

virtual long GetParamValue ( long which); 

void DownloadDSPCode (void) ; 

CDSPSSkManager (HWND p) ; 
virtual -CDSPSSkManager {) ; 

private : 

void SetHotchQdong value, long which, long f reqwhich) ; 
void SetNotchFreq ( long value, long which); 
void SetShelvFregdong value, long which); 
void SetBoostCutdong value, long which); 
void SetRawValuedong value, long which) ; 

double DoConvertFreqRange (double in, double top, double bottom); 
double ConvertFreqRangednt which); 
double ConvertQRange {long val) ; 
double ConvertBoostCutRange (long val); 
virtual void SendDSPVaiue (long which) ; 

int ChecksurnSREC ( char *lineptr,int N) ; 

void GetSRecordAddressRange(char *s, long *start, long *end, char **data) ; 

protected: 

virtual void SetDelaydong value) ; 
void SetLoCutof f (void) ; 



1 



void SetHiCutof f (void) 
void SetHiCutof f 2 (void) ; 



virtual void SetHiCutof f2Q (long value) ; 
virtual void SetHiCutof f2Freq(long value) ; 
virtual void SetHiCutof fQ (long value) ; 
virtual void SetHiCutof fFreq (long value) ; 
virtual void SetLoCutof fQdong value) ; 
virtual void SetLoCutof fFreq (long value) ; 
virtual void SetPreVolurae (long value); 
virtual void SetAnalogVolurae (long value); 



// virtual void SetCutof f IFreg ( long value); 

// virtual void SetCutof flQ ( long value) ; 

// virtual void SetCutof flBoost ( long value); 

// virtual void SetCutof f2Freq ( long value); 

// virtual void SetCutof f2Q (long value) ; 

// virtual void SetCutof f2Boost (long value); 

virtual void SetShelvlFreq (long value) ; 

virtual void SetShelvlBoost (long value); 

virtual void SetShelv2Freq ( long value); 

virtual void SetShelv2Boost (long value); 

virtual void SetNotchlCut (long value); 

virtual void SetNotchlQ (long value); 

virtual void SetNotchlFreq (long value) ; 

virtual void SetNotch2Cut ( long value); 

virtual void SetNotch2Q ( long value); 

virtual void SetNotch2Freq(long value) ; 

virtual void SetNotchSCut (long value) ; 

virtual void SetNotch3Q(long value) ; 

viEtual void SetNotch3Freq(long value) ; 

virtual void. SetNotch4Cut ( long value) ; 

vir°tual void SetNotch4Q{long value); 
victual void SetNotch4Freq(long value) ; 
vtjstual void SetNotchSQ ( long value) ; 
virtual void SetNotchSBoost (long value); 
viftual void SetHotchGCut (long value) ; 
v-iBtual void SetNotchSQ ( long value) ; 
vaigtual void SetNotch6Freq(long value) ; 
virtual void SetNotch7Cut (long value); 
virtual void SetNotch7Q (long value) ; 
virtual void SetNotch7Freg{long value) ; 
vjLStual void SetNotchSFreq (long value) ; 

victual void SetMainVolume ( long value); 



extern CDSP563cManager *g_DSPManager ; 

#endif // !def ined(AFX_DSP56KMANAGER_H_OCF7E2 04_D790_llD2_96EE_006097CDB9E2 INCLUDED_) 
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// DSP56kManager .cpp: implementation of the CDSPSSkManager class. 

'iiiiiiiiiiiiiiiniiiiiiiiiiiiiiiiiiiniiiiiiiiiinniiiiiiiitimiiiii 

#include "stdafx.h" 
jjinclude "sa.h" 
#include "DSPS6kManager .h" 
# include <Tnath..h> 
#include <stdlib.h> 
#include <stdio.h> 
#include <string.h> 

#if 0 

# inc lude " iini t_pp i . h " 

#include "functs.h" 
#endif 

#ifdef SPI 

jfinclude "SPIPEMicroCotnra. h" 
#endif 

iinclude «I2CIPortComm.h" 



#include "sapmem.h" 
#include "SSTPararas .h" 

#ifdef _DEBUG 
#undef THIS_FILE 

static char THIS_FILE(3= FILE_ 

feitefine new DEBUG_NEW 
#i^dif 

mi 0 

static int cmd_delay = 1000; 

at'ltic int io_delay = 50; 
#^adif 



J|4efine FILE_VERSION 2 // file version 

ililsfine GAIN SCALE 8. 



hf volume 

«djfine VOLTOP 1. 

#Sfefine VOLBOT 3.909e-6 

Idlfine VOLRANGE (VOLTOP-VOLBOT) 



3xid lo cutoff and shelving ranges 
idefine FLCTOPRANGE 0.149 // 1000/22050 

l^fine FLCBOTRANGE 0.001769 // 10/22050 

ilefine FLCRANGE ( FLCTOPRANGE- FLCBOTRANGE) 

fdefine FLCTOPRANGE2 4.255 // 2000 

ifdefine FLCB0TRANGE2 2.134 // 15 

#de£iae FHCTOPRANGE 1 // 22050/22050 

#define FHCBOTRANGE 0.63 // 8000/22050 

#define FHCB0TRANGE2 0.42 // 4000/22050 

#define FHCRANGE (FHCTOPRANGE -FHCBOTRANGE) 

#define FHCRANGE2 ( FHCTOPRANGE -FHCBOTRANGE2) 

#define QLCTOPRANGE 1.0 //I 
#define QLCBOTRANGE 0.003891 // 0.001 

#def ine QLCRANGE (QLCTOPRANGE- (QLCBOTRANGE) ) 

#define SAMPLING_FREQ 44100 
#define DELAY_LENGTH 12 8. 

// converts frequency range to log scale 

#define FTOPRANGE 1. 

#define FBOTRANGE 0.134 

#define FRANGE ( FTOPRANGE -FBOTRANGE) 

#define FTOPRANGE2 0.585 // about 2205 top. 

#define FBOTRANGE2 3.531E-3 
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// new ranges using actual frequencies 
ftdefine FT0PRANGE3 4.431 // 3000 Hz 
Sdefine FBOTRANGE3 2.433 // 30 Hz 

//hi cutoff filter ranges 

Sdefine QHC2BOT 0.74 

#define QHC2TOP 2.2 58 

#define FHC2BOT 3.954 // 1000 Hz 

Sdefine FHC2T0P 5.255 // 20 kHz 

#define FHCT0PRANGE3 5.13 // 15000 

#define FHCB0TRANGE3 FHC2BOT 



Static char *m_ParamNames [kUIArraySize] = { "MainVolume" , 
"liOShelf Freq" , 

"LoShelfGain", 
"HiShelf Freq" , 
"HiShelf Gain" , 
"NotchlFreq" , 
"NotchlQ" , 
"NotchlCut" , 
"Notch2Freq" , 
"Notch2Q", 
"Notcli2Cut" , 
"NotchSFreg", 
"Notch.3Q", 
"Notch3Cut " , 

"Notcli4Freq" , 

"N"otch4Q", 
"NotCh4Cut " , 
"WotchSFreq" , 
"NotchSQi' , 
"WotohSCut", 
"PreVolume" , 
"Bypass " , 
"LoCutof fFreq" , 
"LoCutoffQ", 
"HiCutof f Freq" , 
"HiCutof fQ" , 
"HDCDBypass " , 
"HDCDGainScaleOff " , 
"DDXCompBypass " , 
"KotchSFreq" , 
"KotchSQ" , 
"NotchSCut" , 
"KotchVFreg" , 
"Notch7Q" , 
"Notch? Cut" , 
"Analogin" , 
"AnalogVolume" , 
"Delay" , 
"AllpassFreq" , 
"AllpassQ", 
"BypassMask" , 

"HiCutof f2Freq", 
"HiCutof f2Q" , 
"NotchSFreg" , 
"NotchSQ" , 
"NotcliaCut" , 
"NotchSFreq" , 
"Notch9Q" , 
"Notch9Cut", 
"NotchAFreq" , 
"NotchAQ" , 
"NotchACut" , 
"DBNotchWidth" } ; 

////////////////////////////////////////////////////////////////////// 

// SREC code -I 

////////////////////////////////////////////////////////////////////// vuia 
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int CDSPSSkManager : :Chec3csumSREC (char *lineptr, int N) 



unsigned char curbyte, sum=Oxf f ; 

for (int x=2 ;x<N-2;x+=2) 

{ 

sscanf (lineptr+x, "%2x" , &curbyte) ,- 
sum-=curbyte; 

) 

/ / last one is checksum 

sscanf {lineptr+x, " %2x" , tcurbyte) ; 

return (curbyte==sum) ; 

} ■ - 

void CDSP56kManager: :GetSRecordAddressRange (char *s, long *start, long *end, char **data) 



long address, count, soff set ; 

*start = -IL; 
*end = -IL; 

if (*s != 'S') // not a srec 
return; 

// Let's check the checksum for this line 
ASSERT C ChecksumSREC(s, strlen(s) ) ) ; 
switch { s[l] ) 
{ 

case ' 1 ' : 

sof f set=8 ; 

sscanf ( & (s [4] ) , "%4x" , iaddress) ; 
break; 
case '2 ' : 

sof f set=10 ; 

sscanf (&(s [4j ) , "%6x" , Siaddress) ; 
break; 
case ' 3 ' : 

sof fset=12; 

sscanf {&(s [4] ) , "%8x", Siaddress) ; 

break; 
default : 
return ; 
break ; 

} 

count = strlen(s) - soff set - 2; 
*start = address; 

*end = address + (count/6) ; // each word is S characters 

*data = s + soffset; 

} 



void CDSP5 6kManager : : DownloadDSPCode ( ) 
{ 

char **r = pmeiii; 

int coiint = PRECORDS ; 

long start, end; 

long ts,te; 

char **recs; 

char *srecdata, *td; 

char *data, *dptr, *rdata, c; 

long size,bsize; 

long taddress, recstart, recend; 

long value ; 0019 
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// set starting and ending addresses 
start = 0X7FFFFFFFL; 
end = 0 ; 
recs = r; 

for( int 1=0; i < count ; i++ ) 
( 

GetSRecordAddressRange {*recs++, sts, &te, Jisrecdata) ; 
if( ts < OL ) continue; 
start = min(start, ts) ; 
end = max (end, te) ; 

} 

size = end - start; 
bsize = size * 3 ; 

rdata = (char *) malloc (bsize+S) ; // 3 bytes per word plus length and address 

ASSERT ( data != MULL }; 
data = rdata 4- 6; 

dptr = data; 

for( i = 0 ; i < bsize ; i++ ) // clear memory 

*dptr++ = 0 ; 
taddress = start; 
while ( taddress < end ) 
{ 

reCEtart = OxVFFFFFFFL; 
recs = r; 

for( int i = 0; i < count ; i++ ) // search for next address 

{ 

GetSRecordAddressRange ( *recs , Sits , £te, &td) ; 
if( ts >= OL ) 

c 

if( ts >= taddress ) 
{ 

if ( ts < recstart ) 
{ 

recstart = ts; 
recend = te; 
srecdata = td; 

} 

} 

} 

recs++ ; 

} 

ASSERT ( recstart <= end ) ; 
/ / copy record 

dptr = data + ((recstart - start) *3); 

while { recstart != recend ) 

{ 

sscanf (srecdata, "%2x" ^tvalue) ; 
*dptr++ = (char ) value; 
srecdata += 2; 

sscanf (srecdata, "%2x" , lvalue) ; 
*dptr-<-+ = (char ) value; 
srecdata += 2 ; 

sscanf (srecdata, "%2x" , £=value) ; 
*dptr++ = (char ) value; 
srecdata += 2 ; 
recstart++; 

} 

taddress = recend; 

} 

I J copy size and address 

dptr = rdata; 

c = (size >> 16) £: OxFF; 

*dptr++ = c; 

c = (size >> 8) Sc OxFF; 

*dptr++ = c; 

c = size & OxFF; 

*dptr++ = c; 

c = (start >> le) & OxFF; 0 0 <^ 0 



4 



*dptr++ = c; 

c = (start >> e) & OxFF; 
*dptr++ = c; 
c = start £c OxFF; 
*dptr++ = c; 

// send data to DSP 
//m_Cornm->SendDSPWord(Eize) ; 
//m_Conm->SendDSPWord( start) ; 
m_Coinin->SendDSPMemory (rdata, bsize+6) ; 

free ( rdata ) ; 

) 

////////////////////////////////////////////////////////////////////// 
// Construction/Destruction 

////////////////////////////////////////////////////////////////////// 
CDSPSGkMartager : : CDSPSekManager (HWND p) 

#if 0 

if( load_dll 0 ==false ) 
{ 

MessageBox{mJLL,"lMIT_PPI not found in the system directory. Fix this and restart application." "Danger 
anger Will Robxnson", MB OK MB ICONSTOP ) - VP j.u i. , uanger, 

} - I - . 

else 
{ 

init_port_spi (1) ; 

set_cmd_delay_cnt_valiie (cmd_delay) ; 
set_io_delay cnt value (io delay) ; 
) - - _ 

#endif 

ni_pi = acos {-!.), ■ 

ni_Conim = new I2CIPortConira(p) ; 

/ / DownloadDS PCode ( ) ; 



int i ; 

for( i = 0 ; i < kUIArraySize ; i++ ) 
m_Raw2DSPVals [i] = i; 

} 

m_Raw2DSPVals CkNotciiSFreq] = ]cDSPNotch6Freq; 
m_Raw2DSPVals [kNotchSQ] = kDSPNotchSQ; 
m_Raw2DSPVals [IcNotchSCut] = kDSPNotch6Cut ; 
m_Raw2DSPVals [kNotchVFreg] = kDSPKotchTFreq; 
m_Eaw2DSPValB [kNotch7Q] = kDSPNotchVQ; 
m_Raw2DSPVals [kNotch7Cut] = kDSPNotch7Cut ; 
m_Raw2DSPVals [kDelay] = kDSPDelay; 
ra_Raw2DSPVals [kAllpassFreq] = kDSPAllpassFreq; 
m_Raw2DSPVals [kAllpassQ] = kDSPAllpassQ; 

m_Raw2DSPVals [kNotch8Freg] = kDSPNotchSFreq; 
ni_Raw2DSPVals [kNotchSQ] = kDSPNotchSQ; 
m_Raw2DSPVals [kNotchSCut] = kDSPNotchSCut ; 
m_Raw2DSPVals [kNotch9FreqJ = kDSPNotch9Freq; 
rn_Raw2DSPVals [kNotchSQ] = kDSPNotchSQ; 
m_Raw2DSPValB [kHotchSCut] = kDSPNotchSCut; 
tn_Raw2DEPValB [MotchAFreq] = kDSPNotchAFreq; 
m_Raw2DSPVals [kNotchAQ] = kDSPNotchAQ; 
m_Raw2DSPVals [kNotchACut] = kDSPNotchACut ; 

ResetAll { ) ; 



0021 
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CDSP56kManager : : -CDSP56kManager { ) 
{ 



if( m_Comm ) 

delete m_Coitira; 

} 

void CDSPSSkManager: :SetMainVolUTOe(long value) 



doub le fvalue; 

if( value >= 0 ) 

SetRawValue (value, kMainVolume) ; 
if( m_RawVa Is [kMainVolume] == DSP_CONTROL_MAX ) 

m_DSPVals [kDSPMainVolume] = -m_RawVals [kMainVolume] ; 
else if{ m_RawVals [kMainVolume] == 0 ) 

m_DSPVals [kDSPMainVolume] = 0 ; 
else 

{ 

fvalue = m_RawVals [kMainVolume] ; 

fvalue /= DSP_CONTROL_MAX; // normalize 

fvalue *= VOLRANGE; 

fvalue += VOLBOT; 

fvalue = (powdo. , fvalue) - 1 . ) / (10 . -1 . ) ,- 
fvalue *= DSP_CONTROL_MAX; 

tn_DSPVals [kDSPMainVolume] = (long) -fvalue; 

} 

SendDSPValue (kDSPMainVolume) ; 

} 

void CDSP5 6kManager: : SendDSPValue (long which) 



long value = m_DSPVals [which] ; 
*if 0 

// transmitted value has parameter value in top IS bits and parameter identifier in 8 LSBs 

value = (value & OxFFFFOO) | (which & OxFF) ; 
// m_DSPRetum = spi_xchng24 (value) ; 

ra_DSPRetum = ra_Comra->SendDSPWord (value) ; 
Sendif 

/ / changed protocol around to send index followed by data 
char buffer [6] ; 

buffer [03 = (which >> IG) £= OxFP; 
buffer [1] = (which 8) & OxFF; 
buffer [2] = whicli & OxFF; 
buffer [3] = (value >> IS) & OxFF; 
buffer [4] = (value >> 8) & OxFF; 
buffer [5] = value & OxFF; 

m_DSPReturn = m_Comni->EendDSPMemory (buf f er , S) ; 

} 



void CDSPSSkManager : :SetNotchFreg{long ivalue,long which) 
double value; 

int dspindex = m_Raw2DSPVals [which] ; 

if { lvalue >= 0 ) 

SetRawValue (lvalue, which) ; 
value = ConvertFreqRange (which) ; 
value = - cos (m_pi*value) ; 

value *= DSP_CONTROL_MAX; fi A 1 "T" 

m_DSPVals [dspindex] = (long) value; U 0 ,C <la 
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SendDSPValue (dspindex) ; 
SetNotchQ{-lL,which-!-l, which) ; 

} 

#ifdef LEGACY 

void CDSPSSkManager : : SetShelvFreq ( long lvalue, long which) 
{ 

double value, wc; 

int dspindex = m_Raw2DSPV"als [which] ; 

if( ivalue >= 0 ) 

SetRawValue (lvalue, which) ; 
value = ConvertFreqRange (which) ; 
WC = m_pi*value; 

value = {tan.(wc/2) -1) / (tan(wc/2) +1) ; 
value *= DSP_CONTROL_MAX; 
m_DSPVals [dspindex] = (long) value; 
SendDSPValue (dspindex) ; 

} 

#endif 

void CDSP56kManager : : SetNotchQ (long ivalue, long which, long rawfreq) 
{ 

double beta, tbeta, q, wc ; 

int dspindex = m_Raw2JJSPVals [which] ; 

if( ivalue >= 0 ) 

SetRawVaiue (ivalue, which) ; 
wc = ConvertFreqRange (rawfreq) ; 
wc = rajpi*wc; 

q = ConvertQRange (m_RawVals [which] ) ; 
tbeta = wc/ (2*q) ; 
if { tbeta > m_pi/4 ) 

tbeta = ni_pi/4; 
beta = (1. -tan (tbeta) }/(l.+tan (tbeta) ) ; 

beta *= DSP_CONTROL_MAX; 

m_DSPVals [dspindex] = (long) beta; 
SendDSPValue (dspindex) ; 

} 

void CDSP56kManager : : SetBoostCut (long ivalue, long which) 
{ 

double value; 

int dspindex = m_Raw2DSPVals [which] ; 

if ( ivalue 0 ) 

SetRawVaiue (ivalue, which) ; 
value = ConvertBoostCutRange (m_RawVals [which] ) ; 
value = pow (10 ., value) ; 
value /= GAIfI_SCALE; 
value *= DSP_CONTROL_MAX; 
m_DSPVals [dspindex] = (long) value; 
SendDSPValue (dspindex) ; 

} 

void CDSPSSkManager: :SetShelvlFreq{long ivalue) 
{ 

// SetShelvFreq(vaiue, IcLoShelfFreq) ; 
double value, WC; 

if( ivalue >= 0 ) 

SetRawVaiue (ivalue, )cLoShelfFreq) ; 
value = m_RawVals [kLoShelf Freq] ; 

value /= DSP_C0NTR01._MAX; // normalize 0 (1 
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value *= FLCRANGE; 
value += FLCBOTRANGE ; 

value = (powdO . .value) - 1 . ) / (10 . -1 . ) ; 
wc = m_pi*value; 

value = (taii(wc/2) -1) / (tan{wc/2) +1) ; 
value *= DSP_CONTROL_MAX; 
m_DSPVals [kLoShelf Freq] = (long) value; 
SendDSPValue (kLoShelf Freq) ; 

) 

void CDSPSSkManager: :SetShelvlBoost (long value) 
{ 

SetBoostCut (value, kLoShelfGain) ; 

} 

void CDSPSSkManager : :SetSh.elv2Freq( long ivalue) 
{ 

// SetSh.elvFreq(value,kHiShelfFreq) ; 
double value, WC; 

if ( ivalue >= 0 ) 

SetRawVaiue (ivalue, kHiShelf Freq) ; 
value = m_RawVals [kKiShelf Freq] ; 
value /= DSP_CONTROL_MAX; // normalize 
value *= FHCRANGE2; 
value += FHCBOTRANGE2 ; 

value = (pow (10 ., value) - 1. ) / (10 . -1 . ) ; 
wc = ra_pi*value ; 

value = (tan(wc/2) -1)/ (tan(wc/2) +1) ; 
value *= DSP_C0NTROL_MAX; 

ni_DSPVals [kHiShelf Freq) = (long) value; 
SendDSPValue OcHiShelf Freq) ; 

} 

void CDSP5SkManager; :SetShelv2Boost(long value) 
{ 

SetBoostCut (value, kHiShelf Gain) ; 

} 

void CDSPSSkManager: : SetNotchlFreq (long value) 
{ 

SetNotchFreq (value , kNotchlFreq) ; 

) 

void CDSPSSkManager: : SetNotchlQ ( long value) 
{ 

SetNotchQ (value, kNotchlQ, kNotclilFreq) ; 

} 

void CDSPSSkManager: :SetNotchlCut (long value) 
{ 

SetBoostCut (value, kNotchlCut) ; 

} 

void CDSPSSkManager: :SetNotch2Freq( long value) 
{ 

SetNotchFreq(value,kNotch2Freq) ; 0 0 ^ {I 
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} 

void CDSP56kManager: ; SetNoCch2Q ( long value) 
{ 

SetKotchQ (value , kNotch2Q, kNotch2Freq) ; 

} 

void CDSP56kManager: :SetNotch2Cut (long value) 
{ 

SetBoostCut (value, kNotch2Cut) ; 

) 



void CDSPBSkManager: :SetNotch9Freq{long value) 
{ 

double q,f,nf; 

SetNotchFreq (value, kNotchSFreq) ; 

f = ConvertFreqRange (kHotchSFreq) ; 

q = ConverCQRange (m_RawVals [kNotch9Q] > ; 

nf = f - (f / {S.*q)) ; 

if( nf < 0. ) 

nf = 0 . ; 
nf = pow (nf , 0.5) ; 
nf = loglO((nf * (10. -1.)) + D; 

nf -= FBOTRANGE; 

nf /= (FTOPRANGE-FBOTEANGE) ; 

nf *= DSP_COKTROL_KAX; // normalize 

m_RawVals EkNotchSFreq] = (long) nf ; 

nf = f + (f / (5.*q) ) ; 

if( nf > 1. ) 

nf = 1 . ; 
nf = pow(nf , 0.5) ; 

nf = loglO((nf * (10. -1.)) + 1.); 

nf -= FBOTEANGE; 

nf /= (FTOPRANGE-FBOTRANGE) ; 

n£ *= DSP_CONTROL_MAX; // normalize 

m_RawVals [MotchAFreq] = (long) nf; 

SetNotchFreq (-lL,3cNotch8Freq) ; 

SetNotch.Freq{-lL,kNotchAFreq) ; 

} 

void CDSP56kManager ! :SetNotcli3Freq(long value) 
{ 

SetKotchFreg (value , kNot ch3 Freq) ; 

tn_RawVals [kNotchSFreql = (m_RawVals [kNotch4Freq] + m_RawVals [kNotchSPreq] ) /2 ; 
SetNotchFreq (-lL,lcNotch5Freg) ; 

} 

void CDSP56kHanager: :SetiIotch3Q(long value) 
{ 

SetNotchQ (value , kNotchSQ, kNot ch3 Freq) ; 



} 

void CDSPSSkManager: :SetNotch3Cut (long value) 
{ 

SetBoostCut (value, kNotch3 Cut) ; 

> 0025 
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void CDSPSekManager: :SetNotch4Freq(long value) 
{ 

SetNotciiFreq {value , kNotcMFreq) ; 

ra_RawVals [kNotchSFreq] = (TO_RawVals [kNotch4Freq) + ni_RawVals [kNotcli3Freq] ) /2 ; 
SetNotchFreq{-lIi,kNotch5Freq) ; 

} 

void CDSPSSkManager: :SetNotch4Q(long value) 
{ 

SetNotchQ (value , kKotch4Q, kNotch.4Freq) ; 

) 

void CDSPSSkManager: :SetNotch4Cut (long value) 
( 

SetBoostCut (value, kNotch4Cut) ; 

} 

void CDSPSSkManager: :SetNotch5Q( long value) 
{ 

SetMotchQ(value, kNotchSQ, kNotchSFreq) ; 

1 

void CDSPSSIcManager: :SetNotcli5Boost (long value) 
{ 

SetBoostCut (value, IcNotchSCut) ,- 

) 

double CDSPSSkManager :: DoConvertFreqaange (double val, double top, double bottom) 
{ 

val /= DSP_C0OT:R0L_MAX; // normalize 
val *= top - bottom; 
val += bottom; 

val = (powdO. ,val) - 1 . ) / (10 . -1. ) ; 
return ( val ) ; 

) 

double CDSPSSkManager :: ConvertFreqRange (int which) 
{ 

double fval; 

switch( which ) 
{ 

case kNotchlFreq: 
case ]cNotch2Freq: 

fval = DoConvertFreqRange (m_RawVals [which] ,FTOPRANGE3,FBOTRANGE3) ; // top frequency is 0.1 * Nyquis 

t 

fval /= SAMPLING_FREQ/2 ; 
break; 
default : 

fval = DoConvertFreqRange (Tn_RawVals [which] , FTOPRANGE, FBOTRANGE) ; 
// square log scale 
fval = fval * fval ; 
break ; 

} 

re turn ( fval ) ; 

^ 0020 
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// converts Q range to log scale 

if define QTOPRANGE 2.258 

#define QBOTRANGE 0.03 7 

#define QRANGE (QTOPRANGE- QBOTRANGE) 

double CDSP5 6kManager : : ConvertQRange {long ival) 
{ 

double val; 
val = ival ; 

val /= DSP_CONTROL_KAX; // normalize 
val *= QRANGE; 
val += QBOTRAHGE; 

val = {powdo. ,val) - 1 . ) / (10 . -1 . ) ,- 
return ( val ) ; 

} 

// converts input value to log gain value 

//#de£ine LOGS 0.9031 

#def ine LOGGAINSCALE (loglO (GAIN_SCALE) ) 

double CDSP56kManager : iConvertBoostCutRange (long ival) 

( 

double val ; 
val = ival ; 

val /= DSP_CONTROIi_MAX; // normalize 

val = {2.*val*LOGGAINSCALE) - LOGGAINSCALE; 

return ( val ) ; 

) 

void CDSPseicManager : : SetRawValue (long value, long which) 
{ 

if ( value ) 

value += 1; 
value <<= CONTRQL_RANGE_SC; 
m_RawVals [which] = value; 

} 

long CDSP5 6kManager : :GetPararaValue (long which) 
{ 

long value ; 

if ( which >= kUIArraySize ) 

value = 0x4000001, >> CONTROL_RAHGE_SC ; 
else 

value = m_RawVals [which] >> CONTROL_RANaE_sC; 
value-- ; 
if { value < 0 ) 

value = 0 ; 
return ( value ) ; 

) 

void CDSPSSkManager : : SetPararaValue (long value, long which) 
{ 

switch ( which ) 
{ 

case kHiCutof f2Freq: 

SetHiCutoff2Freq( value) ; 

brea)c ; 
case )!:HiCutof f 2Q: 

SetHiCutoff2Q (value) ; 

break; 
case kHiCutof fFreq: 
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SetHiCutof f Freq(value) ; 

break.; 
case kHiCutoffQ: 

SetHiCutof fQ (value) ; 

break; 
case kLoCutoffFreq: 

SetliOCutoffFreq (value) ; 
break; 
case kLoCutoffQ: 

SetLoCutoffQ (value) ; 
break ; 
case kBypass: 

SetBypass (value) ; 
break ; 
case kDDXCompBypass : 

SetDDXCompBypass (value) ; 
break; 
case kHDCDBypass : 

SetHDCDBypass (value) ; 
break ; 
case kHDCDGainScaleOf f : 
EetHDCDGainScale (value) ; 
break; 
case kAnalogVolume : 

SetAnalogVolume (value) ; 
break; 
case kMainVolume; 

SetMainVolume (value) ; 
break; 
case kPreVolunie : 

Set PreVolume (value) ; 
break ; 
case kLoShelf Freq: 

SetShelvlFreq (value) ; 
break; 
case kHiShelf Freq: 

SetShelv2 Freq (value) ; 
break ; 
case kNotchSCut: 

SetBoostCut (value, which) ; 

SetBoostCut (value, kNotchACut) ; // same value 

break; 
case kNotchlCut : 
case kNotch2Cut: 
case kNotchSCut: 
case kNotch.4Cut : 
case kNotchSCut: 
case kNotchSCut: 
case kNotch7Cut- 
case kLoShelfGain: 
case kHiShelfGain: 

SetBoostCut (value, which) ; 
break; 
case kNotchSCut: 

in_DSPVals [kDSPNotchSCut] =0; // fixed notch 

SendDSPValue (kDSPNotchSCut) ; 
break ; 
case kNotchSFreq: 

SetNotch3Freq{value) ; 
break ; 
case kKotch4Freq: 

SetNotch4 Freq (value) ; 
break; 
case kNctchSFreq: 

SetNotch9Freq (value) ; 
break; 
case kNotchlFreq: 
case kNotchSPreq; 
case kNotch5Freq: 
case kNotchSFreq: 
case kNotch7Freq; 
case kAllpassFreq: 



for both, notches 



0028 
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SetNotchFreg (-value, which) ; 
break ; 
case kNotchSQ: 

SetNotchQ (value , which, which- 1) ,- 

SeCNotchQ (value, kNotchAQ, kNotchAQ-1) ; // same value £or both notches 

break ; 
case kNotchSQ: 

SetNotchQ (value , which, which- 1) ; 

SetNotch9Freq(-l) ; 

break ; 
case kNotchlQ: 
case kHotch2Q: 
case kNotch3Q: 
case kNotch4Q: 
case kNotchSQ: 
case kNotch6Q: 
case kNotch7Q: 
case kAllpassQ: 

SetNotchQ {value, which, which- 1) ; 

break; 
case kDelay: 

SetDe lay (value) ; 

break; 

// case kDBNotchWidth : 
// SetDelay (value) ; 

break; 
case kNotchSFreq; 
case kNotchAFreg: 
case kNotchACut: 
case kNotchAQ: 
break; 

} 

) 



void CDSPSSkManager : : SetDSPSettings (CStringArray & array) 
{ 

int i ; 

CString string; 

int index; 

long value; 

int fileversion = 0; 

int j = 0 ; 

double f value; 

const char *sptr; 

/ / reset all parameters 
ResetAll { ) ; 

// first check for conment at head 
string = array.GetAt(O) ; 
sptr = string; 

if( strcmp (sptr, "# VERSION") == 0 ) 
{ 

string = array. Ge tAt (l) ; 
sptr = string; 

sscanf (sptr, "%d" , sfileversion) ; 
j = 2; 

} 

f or ( X = j ; i < array. GetSize ( ) ; i++ ) 
{ 

string = array . Get At (i ) ; 
sptr = string; 

if ( sptr[0] == '#' ) continue; // skip aoraments 

sscanf (sptr, "%d\tOx%x" , &index, tvalue) ; 

if ( index >= kUIArraySize ) continue; 

/ / Add any special treatment of parameters here 

if{ fileversion == OL ) 

{ 

switch ( index > 



X3 



case kNotchlFreq: 
case kNotch2Preq: 

fvalue = DoConvertFreqRange (value, FTOPEANGE, FBOTRAWGE) ; 

Evalue = fvalue * fvalue; 

fval-ue ♦= SAMPLING_FREQ/2 ; 

fvalue = loglO ( (fvalue * {10. -1.)) + l.); 

fvalue -= FB0TRANGE3; 

fvalue /= {FTOPRANGE3-FBOTRANGE3) ; 

if( fvalue > 1.0 ) 

fvalue = 1.0; 
fvalue *= DSP_CONTROL_MAX; // normalize 
value = (long) fvalue; 
break; 

// increased low frequency- 
case kHiShelf Freq-. 

fvalue = DoConvertFreqRange (value, FHCTOPRANGE, FHCBOTRAHGS) 

fvalue = loglO ( (fvalue * (lo.-l.)) + i.); 

fvalue -= FKCBOT5?ANGE2 ; 

fvalue /= (FHCT0PRANGE-FHCB0TRANGE2) ; 

if( fvalue > l.Q ) 
fvalue = 1.0; 

fvalue *= DSP_CONTROL_MAX ; // normalize 

value = (long) fvalue; 

break ; 
case kHiCutof f Freq: 

fvalue = DoConvertFreqRange (value, FHCTOPRANGE, FHCBOTRANGE) 

fvalue *= SAKPLING_FREQ/2; 

fvalue = loglO( (fvalue * (10. -1.)) + 1.); 

Evalue -= FHCB0TRANGE3 ; 

Evalue /= (PHCTOPRANGS2-FHCBOTRANGE3) ; 

if ( fvalue > 1 . 0 ) 

fvalue = 1.0; 
fvalue *= DSP_C0NTROL_MAX; // normalize 
value = (long) fvalue; 
break ; 

} 

) 

else if ( Eileversion == IL ) 
( 

switch { index ) 
{ 

case kNotchlFreq: 
case kKotcMFreq: 

fvalue = DoConvertFreqRange (value, FT0PRAHGE2, FB0TRANGE2) ; 

fvalue *= SAMPLING_FREQ/2; 

fvalue = loglO ( (fvalue * (10. -1.)) + 1.); 

fvalue -= FB0TRANGE3; 

f va lue / = ( FT0PRANGE3 - FB0TRANGE3 ) ; 

if ( fvalue > 1.0 ) 
fvalue = 1.0; 

fvalue *= DSP_CONTROL_MAX; // normalize 

value =■ (long) fvalue; 

break ; 
case kliOCutof f Freq: 

fvalue = DoConvertFreqRange (value, FLCTOPRANGE.FLCBOTRANGE) 

fvalue *= SAMPLING_FREQ/2 ; 

fvalue = logic ( (fvalue * (10. -1.)) + 1.); 

fvalue -= FLCBOTRANGE2 ; 

fvalue /= (FLCTOPRAIIGE2-FLCBOTRANGE2) ; 
if( Evalue > 1.0 ) 

fvalue = 1.0; 
fvalue *= DSP_CONTROL_MAX; // normalize 
value = (long) fvalue; 
break; 
case kHiCutof f2Preq: 

fvalue = DoConvertFreqRange (value, PTOPRANGE, FBOTEAHGE) ; 

fvalue *= SAMPLING_FRE0/2 ; 

fvalue = loglO ( (fvalue * (10. -1.)) + 1.); 

fvalue -= FHC2B0T; 

fvalue /= (FHC2TOP-FHC2BOT) ; 

if ( fvalue > 1.0 ) 
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f value = 1.0; 
fvalue *= DSP_CONTR0L_MAX; // normalize 

value = (long) fvalue; 
break ; 
case kHiCutof fFreq: 

f value = DoConvertFreqRangeC value, FHCT0PRANGE.FHCBOTRANGE2) 

fvalue *= SAMPLIKG_FREQ/2 ; 

Evalue = loglO ( (fvalue * (10. -1.)) + 1.); 

fvalue -= PHCB0TRANGH3 ; 

fvalue /= {FHCTOPRANGE3-FHCBOTRANGE3) ; 
if ( fvalue > 1 . 0 ) 

fvalue = 1.0; 
fvalue *= DSP_CONTROL_MAX; // normalize 
value = (long) fvalue; 
brealt ; 

) 

} 

m_RawVals [index] = value; 

} 

// tell DSP of changes 

for( i = 0 ; i < kUIArraySize ; i++ ) 
( 

SetParamValue ( -1, i) ; ; 
) 

tn_DSPVals [kDSPBypassMask] = m_RawVals [kBypassMask] ; 
SendDSPValue (kDSPBypassMask) ; 

} 

void CDSPSSkManager : -.GetDSPSettings (CStringArray & array) 
{ 

char s [1000] ; 
iut i , index ; 
int j = 0; 
CString ostr; 

// write header (so far only version number) 

cstr = "# VERSION"; 

array . SetAtGrow (j ++, cstr) ; 

sprintf (s, »%d" , FILE_VERSION) ; 

array. SetAtGrow(j++, s) ; 

cstr - "# DATA"; 

array. SetAtGrow(j++, cstr) ; 

for { i = 0 ; i < kUIArraySize ; i++ ) 
{ 

index = kUIArraySize-l-i; 

if ( index ■== kBypass ) continue; 

if( index == JcHDCDBypass ) continue; 

if C index == kHDCDOainScaleOf f ) continue; 

if ( index == JcAnalogIn ) continue ; 

// MM 7/14/99 Added value in human readable form as comment 
GetStringValue (index, cstr) ; 

sprintf (s, "# %s *s" ,m_ParamNames [index] , cstr) ; 
array . Se tAtGrow ( j ++ , s ) ; 

sprintf (s, "%d\tOx%x" , index, m_RawVals [index] ! ; 
array . SetAtGrow ( j ++ , s ) ; 

} 

} 

void CDSPSSkManager; :GetFilterBlob(CStringArray t array) 
i 

char s £1000] ; 
int par am; 
int j = 0; 
CString cstr; 
float v; 

// write version number 
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// cstr = "# VERSION"- 

// array. SetAtGrow{j+;, cstr) ■ 

sprintf{s,..%d",BLOE FILE VERSION). 

array.SetAtGrow(j^+7 s) .-''^^^°^> ' 

If output delay 
param = kDelay; 

GetPureStringValue (param, cstr) - 
sscanf {cstr, "%f",&v) ■ 
iff V != 0. ) 

f 

// cstr = m_ParamNames [param] • 
// array. SetAtGrow(j++, cstr) ■ 

sprint f {s , " %d" , BLOCK;_DELAy)' ■ 

array. SetAtGrowfj++, s) ; 

cstr = "1 11 . 

array. SetAtGrow(j++ cstr) • 

GetPureStringValue (param, cstr) - 
^ array. SetAtGrow(j++, cstr); 

// output pre -gain 

param = kPre Volume; 
// cstr = m_PararaNames [param] ; 
// array. SetAtGrow(j++, cstr) - 

sprxntf (s, .-%d", BLOCK GAIN) ■ ' 

array. SetAtGrow(j++, s) . ' 

cstr = "lit . ' 

array. SetAtGrow{j++ cstr) • 

GetPureStringValue (param, c^tr) - 
array. SetAtGrow(j++, cstr); 

// lo-shelf 

if ( ! GetBypassSection (kBypassLoshelf ) 

cstr = "Low- Shelf «; 
array. SetAtGrow(j+;, cstr) • 
sprintf (s, "%d", BLOCK LS) - 
arr ay . Se tAtGrow ( j ++ , s ) - ' 
cstr = "2"' ' ' 

array. SetAtGrow(jH-+, cstr) • 
GetPureStringValue (kLoShelf Prea cstrl 
array. SetAtGrow(3++, cstr) ^ ^ ' 
GetPureStringValue (kLoShelfGain cstr) 
array. SetAtGrow(j++, cstr). ^^'"^''''^ 



} 

// hi-shelf 

if( iG=tBypassSection(kBypassHiShelf) ) 
// cstr = "High-Shelf". 
'I array. S6tAtGrow(j++, cstr). 
sprintf (B, "%d«, BLOCK HS) • 

array. SetAtGrow(j+.,,~s) . ' 
cstr = "2". ' 

array. SetAtGrowOV^, cstr); 
GetPureStringValue (kHishelfFreg cstr) 
array. SetAt6row(j+,., cstr) - 
GetPureStringValue (kHiShelfGain cstr) 
^ array. SetAtGrowfj.^.., cstr) ; ' ' 

/ / low peaking cutoff 

ie( '°«tBypassSection(kBypassHipass) ) 
// cstr = "Low Cutoff. 

// array. SetAtGrow(j+.^; cstr) . 
sprintf (s, "%d«, BLOCK HP) . 
array . Se tAtGrow ( j ++ , s ) . ' 
csfcar = "2 » . ' 

array. SetAtGrow(j.H+, cstr). 

GetPureStringValue (kLoCutof f Preg, cstr) ; 



array. SetAtGrow<j++, cstr) • 
GetPureStringValue(kLoCutoffQ cstr) • 

// high pealcing cutoff #i 
if( 'GetBypassSection(kBypassLopass) ) 
// cscr = "High Cutoff". 
// array. SetAtGrow{j + ^., 'cstr) - 
sprintf ( s , " %d " , BLOCK_LP) • 
array. SetAtGrow(j++, s) ; ' 
cstr - "2"; 

array. SetAtGrow(j++, cstr). 

GetPureStringValue (kHiCutof f Fre<. cstr) 
array.SetAtGrow{3++ cstr)- '"^'''^^''> 

GetPureStringValue {kHiCutoffQ cstr) ■ 
^ array. £etAtGrow(j++, cstr); ' 



/ / high peaking cutoff 



#2 



if( 'GetBypassSection(k£;passNLopass) ) 



{ 

// cstr 
// 



// 
// 



) 



"High Cutoff #2 " • 
array. SetAtGrow(j++, cstr) ■ 
sprintf Cs, "%d", BLOCK LP2) • 
array.SetAtGrow(j++, g) . ' 
cstr = "2 " . ' 

array. SetAtGrow(j++, cstr) • 
GetPureStringValue (kHiCutof f SFrecr cstr) 
array. SetAtGrow(j+ + , cstr)- 

GetPureStringValue (kHiCutoff 20 cstr) • 
array. SetAtGrow(j++, cstr) . ' 



// resonance comp #i 

if( "?^tBypassSection(kBypassNotchl) ) 

cstr = "Parametric EQ" • 
array. SetAtGrow(j++, cstr). 
sprxntf (s, ■'%d", BLOCK PEQ) . ' 
array.SetAtGrow(j++ s) ■ ' 
cs tr = " 3 n ; ' 

array. SetAtGrow(j*+, cstr) ■ 

GetPureStringValue {kNotchli-reg cstr) . 
array. SetAtGrow(j+.H, cstr) . ^^'^'^^ ' 

GetPureStringValue (kNotchlQ, cstr) ■ 
array. SetAtGrow(j++, cstr) 
GetPureStringValue (kNotchl^t, cstr) - 
array. SetAtGrow(j++, cstr)- 



// resonance comp #2 

if( ^GetBypassSection(kBypassNotch2) ) 
// cstr = "Parametric EQ" • 
// array. setAtGrow(j++, cstr) . 
Eprintf(s,'.%d", BLOCK PEQ) . ' 
array . SetAtGrow ( j ++ , ~s ) - ' 

array.SetAtGrow(j.,+ , cstr). 

GetPureStringValue (kNotch2Freq cstr) - 
array. SetAtGrow(j.., cstr) . ''^'5' ' 

GetPureStringValue {kMotch2Q, cstr) - 
array.SetAtGrowCj.., cstr) ; ^ ' 

GetPureStringValue (kNotch2Cut cstr) - 
array. SetAtGrow (jH-^, cstr) - ^ ^ ' 



// resonance comp #3 

if( '«etBypassSection(kBypassNotch3) ) 



// cstr = "Parametric BQ" ; 

II array. SetAtGrow(j++, cstr) ; 

sprint f (s, "%d" , BLOCK_PEQ) ; 

array. SetAtGrow s) ; 

cstr = "3"; 

array . SetAtQrow (j ++, cstr) ; 
GetPureStringValue (kNotchSFreq, cstr) ; 
array . SetAtGrow (j ++, cstr) ; 
GetPureStringValue (kNotchSQ, cstr) ; 
ar r ay . Set AtGr ow ( j + + , cstr); 
GetPureStringValue (kNotchSCut , cstr) ; 
array. SetAtGrow {j++, cstr); 

} 

// resonance comp #4 

i£{ !GetBypassSection(kBypassHotch4) ) 
{ 

// cstr = "Parametric EQ" ; 

// array. SetAtGrow (j++, cstr) ; 

sprintf (s, "%d" , BLOCK_PEQ) ,- 

array . SetAtGrow (3++ , s) ; 

cstr = "3" ; 

array. SetAtGrow cstr) ; 
GetPureStringValue (kNotcli7Freq, cstr) ; 
array. SetAtGrow{j ++, cstr) ,- 
GetPureStringValue {kNotch7Q, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue ( kNotch7 Cut , cstr) ; 
array . SetAtGrow (j ++, cstr); 

} 

// conecry 

if( IGetBypassSection <kBypassConecry) ) 
{ 

// cstr = "Parametric EQ" ; 

// array. SetAtGrow(j++, cstr) ; 

sprintf (e, "%d" , BLOCK_PEQ) 

array. SetAtGrow s) ; 

cstr = "3" ; 

array. SetAtGrow cstr) ; 
GetPureStringValue (kNotchSFreq, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotchSQ, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotchSCut, cstr) ; 
array. SetAtGrow cstr) 

// cstr = "Parametric EQ" ; 

// array . SetAtGrow (j++, cstr); 

sprintf (s, "%d" , BLOCK_PEQ) ; 

array. SetAtGrow(j++, s) ; 

cstr = "3 " ; 

array, SetAtGrow cstr); 
GetPureStringValue ()cNotch4Preq, cstr) ; 
array , SetAtGrow (j++ , cstr); 
GetPureStringValue (kNotch4Q, cstr) ; 
array .SetAtGrow cstr); 
GetPureStringValue (IcNotch4Cut, cstr) ; 
array. SetAtGrow cstr) ; 

// cstr = "Parametric EQ" ; 

// array. SetAtGrow(j++, cstr); 

sprintf ( s , " %d" , B1,0CK_PEQ) ; 

array . Se tAtGr ow ( j + + , s ) ; 

cstr = "3" ; 

array . SetAtGrow (j ++, cstr); 
GetPureStringValue (kNotchSFreq, cstr) 
array . SetAtGrow (j ++, cstr) ; 
GetPureStringValue (kNotchSQ, cstr) ; 
array. SetAtGrow(j++, cstr); 
GetPureStringValue (kNotchSCut , cstr) ; 
array . SetAtGrow (j ++, cstr); 



) 



// allpass 

if ( !GetBypassSection(kBypassAllpass) ) 
{ 

// cstr = "Parametric EQ"; 

// array. SetAtGrow(j++, cstr) ; 

sprintf (s, " %d" , BLOCK_AP) ; 

array. SetAtGrow (j ++, s) ; 

cstr = "2"; 

array. SetAtGrow (j ++, cstr) ; 
GetPureStringValue (kAllpassFreq, cstr) 
array . SetAtGrow cstr) 
GetPureStringValue (kAllpassQ, cstr) ; 
array . SetAtGrow cstr); 

) 

// double-funed notch 

if ( iGetBypassSection(kBypass0BNotch) ) 
{ 

// cstr = "Parametric EQ"; 

// array. SetAtGrow cstr) ; 

sprintf (s , "%d" , BI,OCK_PEQ) ; 

array. SetAtGrow ( j ++, s) ; 

cstr = "3"; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue ()cNotchBFreq, cstr) 
array. SetAtGrow (j++, cstr) 
GetPureStringValue OcNotchSQ, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotch8Cut, cstr) ; 
array. SetAtGrow cstr) ; 

// cstr = "Parametric EQ"; 

// array. SetAtGrow(j-^+, cstr); 

sprintf ( s , " %d" , BLOCK_PEQ) ; 

array. SetAtGrow (j++, s) ; 

cstr = "3"; 

array. SetAtGrow cstr) ; 
GetPureStringValue (KNotchSFreq, cstr) 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotchSQ, cstr) ; 
array.SetAtGrow{j++, cstr) ; 
GetPureStringValue (JiNotch9Cut, cstr) ; 
array . SetAtGrow (j ++ , cstr) ; 

// cstr = "Parametric BQ"; 

// array. SetAtGrow(j++, cstr) ; 

sprintf (s, "%d" ,BLOCK_PEQ) ; 

array. SetAtGrow s) ; 

cstr = "3"; 

array . SetAtGrow (j ++, cstr); 
GetPureStringValue (JcNotchAFreq, cstr) 
array. SetAtGrow (j++, cstr); 
GetPureStringValue (kilotchAQ, cstr) ; 
array .SetAtGrow (j++, cstr); 
GetPureStringValue CkNotchACut, cstr) ; 
array. Set AtGrow{j++, cstr); 

} 

// output post-gain 

param = kMainVolume; 
// cstr = ra_ParamNan:ies [parara] ; 
// array. SetAtGrow cstr); 

sprintf ( B , " %d" , BLOCK_GAIN) ; 

array . Se tAtGrow { j ++ , s ) ; 

cstr = "1"; 

array. SetAtGrow cstr) ; 
GetPureStringValue (param, cstr) ; 
array. SetAtGrow cstr); 



} 



void CDSPSSkManager : : SetPreVolume (long value) 



double f value ; 

if ( value >= 0 ) 

SetRawValue (value, kPreVolume) ; 
if{ ta_RawVals [kPreVolume] == DSP_CONTROL_MAX ) 

m_DSPVals [kDSPPreVolume] = -m_RawVals (kPreVolume] ; 
else if ( in_RawVals [kPreVolume] == 0 ) 

m_DSPVals [kDSPPreVolume] = 0; 
else 

{ 

fvalue = m_RawVals [kPreVolume] ; 

fvalue /= DSP_CONTROL_MAX; // normalize 

fvalue *= VOLRANGE; 

fvalue += VOLBOT; 

fvalue = (pow( 10., fvalue) - 1 . ) / (10 . -1 . ) ; 

fvalue *= DSP_CONTROL_MAX ; 

in_DSPVals [kDSPPreVolume] = (long) -fvalue; 

} 

SendDSPValue (kDSPPreVolume) ; 

} 

void CDSPSSkManager : iSetAnalogVolume (long value) 
{ 

double fvalue; 

if ( value >= 0 ) 

SetRawValue (value, kAnalogVolume) ; 
if( ra_RawVals fkAnalogVolume] == DSP_COKTROL_MAX ) 

m_DSPVals [kDSPAnalogVol] = -m_RawVals [kAnalogVolume] ; 
else if { m_RawVals CkAnalogVol-ume] == 0 ) 

m_DSPVais [kDSPAnalogVol] = 0; 
else 

{ 

fvalue = ro_RaviValB [kAnalogVolutne] ; 
fvalue /= DSP_CONTROL_MAX; // normalize 
fvalue *= VOLRANGE; 
fvalue += VOLBOT; 

fvalue = (pow (10 ., fvalue) - 1 . ) / (10 . -1 . ) ; 

fvalue *= DSP_CONTROL_MAX; 

ra_DSPVals [kDSPAnalogVol] = (long) -fvalue; 

) 

SendDSPValue (kDSPAnalogVol) ; 



void CDSP56kManager : : SetBypass (long value) 
{ 

if { value >= 0 ) 

SetRawValue (value, kBypass) ; 
if( TO_RawVals [kBypass] ) 

m_DSPVals [kDSPBypass] = 0x7FFFFF; 
else 

m_DSPVals [kDSPBypass] = 0; 
SendDSPValue (kDSPBypass) ; 



void CDSPSSkManager :: SetLoCutoffFreq( long value) 
{ 

if( value >= 0 ) 0 0 B 

SetRawValue (value, kLoCutoffFreq) ; U KJ %J 
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SetlioCutof f {) ; 

} 

void CDSP56!cManager: :SetLoCutoffQ(long value) 
{ 

if( value >= 0 ) 

SetRawValue (value, kLoCutoffQ) ; 
SetLoCutof f 0 ; 

} 

void CDSPSSkManager: -. SetHiCutof f Freq { long value) 
{ 

if { value >= 0 ) 

SetRawValue {value, kHiCutoffFreq) ; 
SetHiCutof f () ; 

} 

void CDSP56kManager: : SetHiCutof fQ (long value) 
{ 

if ( value >= 0 ) 

SetRawValue (value, kHiCutoffQ) ,- 
SetHiCutof f() ; 

} 

void CDSPBSkManager; : SetHiCutof f2Freq (long value) 
{ 

i£{ value >= o ) 

SetRawValue (value, kHiCutof f 2Freg) ; 
SetHiCutof f 2 () ; 

) 

void CDSPSSkManager: :SetHiCutofE2Q{long value) 
{ 

if ( value >= o ) 

SetRawValue (value, kHiCutof f2Q) ,- 
SetHiCutof f 2 0 ; 

} 



void CDSPSSkManager ! :SetHiCutof f () 
{ 

double f,q; 
double al , a2 , bO ; 

q = Tn_RawVals [kHiCutof fQ] ; 

q /= DSP_CONTROL_MAX; // normalize 

q *= QLCRANGE; 

q += QLCBOTRANGE; 

q = (pow(10.,q) - 1. ) /(lO.-l.) ; 
i£( q >= 1. ) 
q = 0.99999; 

/*f = m_RawVals [kHiCutoffFreq] ; 

f /= DSP_CONTROL_MAX; // normalize 

f *= FHCRAHOE2; 

f += FHCBQTRAKGE2 ; 

f = (pow{10.,f) - l.)/(10.-l.) ,- */ 

f = DoConvertFreqRange(m_RawVals tkHiCutof fFreql , FHCT0PRANGE3 , FHCB0TRAKGE3 ) 

f /= SAMPLING_FREQ/2; 

f = 2. * Bin( f * m_pi / 2 . ) ; 
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a2 = X. - f * q; 
if( a2 >= 2. ) 

a2 = 1.99999; 
else if ( a.2 <= -2. ) 

a2 = -1.99999; 
al = - (2. - f * q - f * f } ; 
if( al >= 2. ) 

al = 1.99999; 
else if( al <= -2. ) 

al = -1.99999; 
bO = f * f / 2 . ; 
if{ bO >= 8. ) 

bO = 7.99999; 
else if( bo <= -8 . ) 

bO = -7.99999; 

Tn_DSPVals [kDSPHiCutoffA2] = (long) 
SendDSPValue{kDSPHiCutoffA2) ; 
tn_DSPVals [kDSPHiCutoffAl] = (long) 
SendDSPValue (kDSPHiCutof fAl) ; 
m_DSPVals [kDSPHiCutoff Scale] = (Ic 
SendDSPValue (kDSPHiCuCoff Scale) ; 



(a2 * DSP_C0NTR01._MAX/ 2.); 

Cal * DSP_CONTR0L_MAX/2 . ) ; 

g) (bO * DSP_CONTROL_MAX/ 15.); 



void CDSP56)cManager: : SetHiCutof f 2 { ) 
{ 

doable £,q; 

double al , a2 , bO ; 

double gamma, beta, lambda, alpha; 

g = DSP_CONTROIi_MAX - m_RawVals [kHiCutof f 2Q] ; // invert scale 
q /= DSP_CONTROL_MAX; // normalize 

g *= (QHC2TOP-QHC2BOT) ; 
q += QHC2B0T; 

q= (pow{10.,g) - 1.)/{10.-1.) ; 
// f = ConvertFreqRange (kHiCutof f 2 Freq) ; 

f = DoConvertFreqRange {tn_RawVals [kHiCutof f2FreqJ , FHC2T0P, FHC2B0T) ; 
f /= SAMPLING_FREQ/2 ; 

gamma = - cos<f * ra_pi) ; 

beta = (1. - sin(f *m_pi/ {2*q) ) ) / (1 . + sin(f*m_pi/ (2*q) ) ) ; 
if( beta > 2.0 ) 

beta = 2.0; 
lambda = 4. * beta * (garama/ (1 . +beta) ) ; 
if( lambda > 2.0 3 

lambda =2.0; 
alpha = 1. + beta +• lambda; 

a2 = beta; 
al = lambda ; 
bo = alpha / 4 . ; 
if ( bO >= 8 . > 

bO = 7.99999; 
else if( bo <= -8. ) 

bO = -7.99999; 

m_DSPVals [kDSP2HiCutoffA21 = (long) (a2 * DSP_CONTROL_MAX/ 2.); 
SendDSPValue (kDSP2HiCutof fA2) ; 

m_I>SPVals [kDSP2HiCutoffAl] = (long) (al ♦ DSP_CONTROL_MAX/2 . ) ; 
SendDSPValue (kDSP2HiCutoffAl) ; 

m_DSPVals [kDSP2HiCutoff Scale] = (long) <bO * DSP_CONTROL_MAX/ 15.); 
SendDSPValue (kDSP2HiCutoff Scale) ; 

} 

void CDSPSSkManager : : SetLoCutof f ( ) 
{ 

double f ,q, scale_f actor; 0038 



22 



q = vn_RawVals [kLoCutoEfQ] ; 

q /= DSP_CONTROL,_MAX; // normalize 

q *= QLCRANGE; 

q += QLCBOTRANGE; 

q= (pow(10.,q) - 1.)/(10.-1.) ; 

i£( q >= 1. ) 

q = 0.99999; 
f = m_RawVals [kLoCutof f Freq] ; 
f /= DSP_CONTROl4_MAX; // normalize 
f *= (Fl.CTOPRANGE2-FLCBOTl?A»GE2) ; 
f += FLCB0TRANGE2 ; 
f = (pow(10.,f) - l.)/(10.-l.) ; 
f /= SAMPLING_FREQ/2; 
f = 2. * sin( f * m_pi / 2 . ) ; 
-if( f >= 1. ) 

f = 0.99999; 
scale_f actor = (4 . - 2 . * f * q - f * f ) /4 . ; 

m_DSPVals [kDSPLoCutof f Fc] = (long) {f * DSP_CONTROL_MAX) ; 
SendDSPValue (kDSPLoCutof fFc) ; 

m_DSPVals [kDSPLoCutof fQc] = (long) (g * DSP_CONTEOL_max) ; 
SendDSPValue (kDSPLoCutof fQc) ; 

ra_DSPVals [kDSPLoCutof fScale] = (long) (-0.5 * scale_f actor * DSP_CONTROIj_MAX} 
SendDSPValue (kDSPLoCutof fScale) ; 

} 



void CDSPSSkManager: iSetDDXCompBypass (long value) 
{ 

if ( value >= 0 ) 

SetRawValue (value, kDDXCompBypass) ; 
if{ m_RawVals [kDDXCompBypass] ) 

m_DSPVals [kDSPDDXCompBypass] = 0x7FFFFF; 
else 

m_DSPVals [kDSPDDXCompBypass] = Q; 
SendDSPValue (kDSPDDXCompBypass ) ,- 



} 

void CDSPSSkManager : ;SetHDCDBypass{lona value) 
{ 

if ( value >= o ) 

SetRawValue (value, kHDCDBypass) ; 
if( tn_RawVals [kHDCDBypass] ) 

m_DSPValS [kOSPHDCDBypass] = 0x7FFFFF; 

else 

m_DSPVals CkDSPHDCDBypassl = 0; 
SendDSPValue (kDSPHDCDBypass) ; 



) 

void CDSPSSkManager: :SetHDCDGainScale( long value) 
{ 

if { value >= o ) 

SetRawValue (value, kHDCDGainScaleOff) ; 
if( in_RawVals [kHDCDGainScaleOff] ) 

m_DSPVals [kDSPHDCDGainScaleOf f ] = 0x7FFFFP; 
else 

m_DSPVals [kDSPHDCDGainScaleOf f) = 0; 
SendDSPValue (kDSPHDCDGainScaleOf f) ; 

} 

void CDSPSSkManager ; :ResetAll {) 
{ 
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int i ; 

for( i = 0 ; i < kUIArraySize ; i++ ) 
{ 

tn_RawVals [i] = Ox400000L; 
} 

for{ i = 0 ; i < kDSPArraySize ; i++ ) 
{ 

m_DSPVals li] = 0; 
} 

mJRawVals [kAnalogVolume] = OxSOOOOOL; 
m_RawVals [kMainVolume] = OxSOOOOOL; 
m_RawVals [kPre Volume) = OxSOOOOOL; 
m_RawVals [kBypass] = OxOOOOOOL; 
m_RavVals [kHDCDBypass] = OxOOOOOOL; 
ni_RawVals [kDDXCorapBypassl = OxOOOOOOL; 
m_RawVals[kHDCDGainScaleOff] = OxOOOOOOL; 
m_RaMVals [kAnalogIn] = OxOOOOOOL; 
ni_RawVals [kDelay] = OxOOOOOOL; 

m_RawVals [kHiCutof f2Freq) = OxSOOOOOL; 
tn_RawVals [kHiCutof f2Q3 = OX200000L; 
m_RawVals (kHiCutof fFreql = OxSOOOOOL; 
m_RawValsIkHiCutoffQ] = Ox200000L; 
m_RawVals [kLoCutof f Freq] = 0x40000L; 
m_RawVals[kLoCuto£fQ] = Ox2OO0OOL; 

ra_DSPReturn = 0 ; 

for( i = 0 ; i < kUIArraySize ; i++ ) 
{ 

SetPar amValue ( - 1 , i ) ; 
} 

Tn_DSPVals (kDSPBypassMask] = m_RawVals [kBypassMask] = OL 
SendDSPValue (kDSPBypassMask) ; 

} 

void CDSPSSkManager: :SetNotcb6Freq{long value) 
{ 

SetNotclvFreq (value, kNotchS Freq) ; 

} 

void CDSPSSkManager: : SetNotchSQ (long value) 
{ 

SetNotchQ (value, kUotchSQ, kNotchSFreq) ; 

} 

void CDSP5 SkKajiager : : SetNotchSCut ( long value) 
{ 

SetBoostCut (value, kNotchSCut) ; 

} 

void CDSPSSkManager: :SetNotch7Freq(long value) 
{ 

SetNotchPreq (value, kUotchV Freq) ; 

} 

void CDSPSSkManager: :SetNotc!i7Q( long value) 
{ 

SetNotchQ (value , kNotch7Q, kNotch7Freq) ; 
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void CDSPSSkManager : :SetNotch.7Cut (long value) 
{ 

SetBoostCut (value, kNotch7Cut) ; 

) 



int CDSP56kManager : : GetHDCDMode ( ) 
{ 

// SetParamValue (-l,kMainVolume) ; 
// return ( ni_D_SPReturn ) ; 

return ( ni_Comm- >GetDetectState ( ) ) ; 

] 

void CDSPSekManager : :SetAnalogInput (long value) 
{ 

if C value 0 ) " 

SetRawValue (value, ktoalogln.) ; 
if( m_RawVals [3cAnalogIn] ) 

m_DSPVals [kDSPAnalogIn] = 0x7FFFFF; 
else 

ra_DSPVals [5i:DSPAnalogIn] = 0; 
SendDSPValue (kDSPAnaloglnJ ; 

} 

BOOI. CDSPSSkNanager; :IsReady C) 
{ 

return { m_Cotnra->CIieckSCate () ) ; 

} 

void CDSPSSkMaaager : rGetPureStringValue (int which, CString &str} 
{ 

int count ; 

GetStringValue (which, str) ; 
str.TrimLeftO ; 
count = str. Find (' ' ) ,- 
if ( count >= 0 ) 

str = str. Left (count) ; 

} 

void CDSP56kManager : :GetStringValue (int which, CString Scstr) 
{ 

double value; 
char s [100] ; 

switch ( which ) 
{ 

case kAnaiogVolume : 
case kMainVoiume: 
case kPreVolume : 

value = m_RawVals [which] ; 

value /= DSP_CONTROL_MAX; 

value = 20 * loglO (value) ; 

sprintf (s, "%10 .2f dE", value) ,- 

str = s; 

break; 
case kHiCutof f Freg: 

/* value = m_RawVals [whichj ; 

value /= DSP_CONTROL_MAX; // normalize 

value *= FHCRANGE2; 
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value += FHCB0TRANGE2 ; 

value = (pow (10 ., value) - 1 . ) / (10 . -l . ) ; 
value *= SAMPIjING_FREQ/2 ; */ 

value = DoConvertFreqRange(m_RawVals [kKiCutof f FreqJ , FHCT0PRANGE3 , FHCBOTRANGEJ ) ; 
sprintf (s, "%10.2f Hz", value); 
str = s; 
break ; 
case kHiCutof f 2Q: 

value = DSP_COHTROLi_MAX - in_RawVals [kHiCutof f2Q] ; 
value /= DSP_CONTROL_MAX,- // normalize 
value *= QHC2TOP-QHC2BOT; 
value += QHC2BOT; 

value = (pow ( 10. , value) - 1 . ) / (10 . -1 . ) ; 
sprintf (s, " %10 . 2f" , value) ; 
str = s; 
break; 
case kHiCutof fQ: 

value = m_RawVals IkHiCutof fQ] ; 

value /= DSP_CONTROL_MAX; // normalize 

value *= QLCRANGE; 

value += QLCBOTRANGE; 

value = (pow(10. , value) - 1 . ) / (10 . -1 . ) ; 
if ( value >= 1. ) 

value = 0.99999; 
sprintf (s, "%10.2f", value) ; 
str = s; 
break; 
case kLoCutof f Freg: 

value = ra_RawVals {kLoCutof f Freq} ; 
value /= DSP_CONTROL_MAX; // normalize 
value *= (FLCTOPRANGE2-FLCBOTRASGE2) ; 
value += FLCBOTRANGE2 ; 

value = (pow (10. , value) - 1.)/(1C.-1.); 
sprintf (s, "%10. 2 f Hz", value); 
str = s; 
break; 
case kLoCutof fQ: 

value = ra_RawVals [kLoCutof fQ] ; 

value /= DSP_CONTEOL_MAX; // normalize 

value *= QLCRANGE; 

value += QLCBOTRANGE; 

value = (pow (10. .value) - 1 . ) / (10 . -1 . ) ; 
if ( value >= 1. ) 

value = 0,99999; 
sprintf (s, "%10 . 2f" .value) ; 
str = s; 
break; 
case kLoShelf Fretj: 

value = r[i_RawVals [kLoShelf Freg] ; 

value /= DSP_cONTROL_MAX; // normalize 

value *= FLCRANGE; 

value += FLCBOTRANGE; 

value = (pow (XO . .value) - 1 . ) / (10 . -1 . ) ; 
value *= SAMPLING_FREQ/2 ; 
sprintf (s. ''%10.2f Hz", value); 
str = s ; 
break; 
case kHiSiielf Freq: 

value = m_RawVals [kHiShelf Freq] ; 

value /= DSP_COirrROL_MAX; U normalize 

value *= FHCRANGE2; 

value += FHCBOTRANGE2 ; 

value = (pow (10. .value) - 1 . ) / (10 . -1 . ) ; 

value *= SAMPLIHG_FREQ/2 ; 

sprintf (s. "%10.2f Hz", value); 

str = S; 

break; 
case kNotchlCut : 
case kNotch2Cut: 
case 3cNotch3Cut: 
case kNotcli4Cut: 
case kNotchSCut: 
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case kNotchSCut: 
case kNotchVCut: 
case kNotchSCut: 
case kNotchSCut: 
case kNotchACut : 
case kLoShelfGain: 
case kHiShelfGain: 

value = 20 * ConvertBoostCutRange (m_RawVals [which] ) ; 

sprintf (s, "%i0.2f dB", value), - 

str = s; 

break; 
case kNotchlFreq: 
case kNotch2Freq: 
case kNotch3Freq: 
case kNotch4Freq: 
case kNotchSFreq: 
case kNotchSFreq: 
case kNotch7Freq: 
case kNotchSFreq: 
case kNotchSFreq: 
case kNotchAFreq: 
case kAllpassFreq: 

value = ConvertFregRange (which) ; 

value ♦= SAMPLING_FREQ/2 ; 
sprintf (a, "%1Q .2f Hz", value); 

str = s; 

break; 
case kHiCutof f 2Freq: 

value = DoConvertFreqRange(m_RawVals tkHiCutof f 2Freq] , FHC2T0P , FHC2BOT) 

sprintf (s, "%10.2f Hz value ) ; 

str = s; 

break; 



case 


kNotchlQ: 


case 


kNotch2Q : 


case 


kNotchSQ: 


case 


kNotch4Q: 


case 


kNotchSQ: 


case 


kNotchSQ: 


case 


kNotchTQ: 


case 


kNotchSQ: 


case 


kNotchSQ : 


case 


kNotchAQ: 


case 


kAl IpassQ 



value = ConvertQRange <m_RawVals [which] ) ; 

sprintf (s, "%10 . 2f ", value) ; 

str = s; 

break; 
case kDelay: 

value = m_RawVals [which] ; 

value /= DSP_CONTROL_MAX; 

value *= DELRY_LKNGTH; 

value /= SAMPLING_FREQ; 

value *= 1000 . ; 

sprintf (s, "%10 . 2f mS", value); 

str = s; 

break; 
default: 

str = "fixed"; 

break; 

} 



BOOL CDSPSSkManager: : IsBusy 0 
{ 

return( ni_Comm->IsTransmitting ( ) ); 

) 

void CDSP56kManager: :SetBypassSection.(BOOL. value, int which) 
{ 
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long mask = IL « which; 



if ( value ) 
{ 

tti_RawVals [kBypassMask] j= mask; 

) 

else 
{ 

mask = -mask; 

m_RawVals [kBypassHask] &= mask; 

1 

m_DSPVals IkDSPBypassMask) = m_RawVals [kBypassKask] ; 
SendDSPValue (kDSPBypassMask) ; 

} 

BOOL CDSPSSkMaaager : :GetBypassSeccion (int which) 
{ 

long mask = IL << which; 

return( (m_RavfVals [kBypassMask} & mask) != 0 ); 

) 

void CDSPSSkManager : : SetDelay (long value) 
{ 

if { value >= 0 ) 

SetRawValue (value , kDelay) ; 
m_DSPVals [kDSPDelay] = m_RawVals [kDelay] ; 
SendDSPValue (kDSPDelay) ; 



} 
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// UI IDs 
enum { 

3cMainVolume , 

kLoShelfFreq, 

kLoShelf Gain, 

kHiShelf Freq, 

kHiSlielfGain, 

kNotchlFreg, 

kNotchlQ, 

kNotchlCut, 

kNotch2Freq, 

kNotch2Q , 

3tHotch2Cut, 

kNotchSFreq, 

kNotchSQ, 

kNotcIl3Cut, 

kNotch.4Freq, 

kNotch4Q, 

kNotch4Cut, 

kKotchSFreg, 

kUotchSQ, 

kNotchSCut, 

kPreVolume, 

kBypass, 

kLoCutof fFreq, 

kLoCutof fQ, 

kHiCutof fFreq, 

kHiCutoffQ, 

kHDCDBypass, 

kHDCDGainScaleOf f , 

kDDXCompBypass , 

kNotchSFreq, 

kJIotchSQ, 

kNotchSCut, 

kNotch7Freq, 

KKotchTQ, 

klTotchTCut , 

kAnalogIn, 

kajTialogVolume , 

kDelay, 

kAllpassFreq, 

kAllpassQ, 

kBypassMask, 

kHiCutoff 2Freq, 

kHiCutof f2Q, 

kNotch-SFreq, 

kNotchSQ, 

kNotchSCut, 

kNotchSFreq, 

kNotchSQ, 

3cNotch9Cut, 

kNotchAFreq, 

IcNotchAQ, 

IcNotchACut, 

kDBNotchWidth 



#define kUIArraySize (kDBNotchWidth+1) 

// orphaned control IDs 
/* 

Sdefine kNotchSPreq (10000+20) 
#define kNotchSQ {10000+21) 
#define kNotchSBoost (10000+22) 
#define kNotchVFreq (10000+23) 
#define )iffotch7Q (10000+24) 
#define kNotchVBoost (10000+25) 
#define kLoShelf 2Freg (100 00+2 6) 
Sdefine kLoShelf 2Boost (10000+27) 
#define IcHiSheif 2Freq (10000+2 8) 
#define kHiShelf 2Booat (10000+29) 



*/ 



// DSP IDs 

enura { 

kDS PMa inVolume , 
kDSPLoShelfFreq, 

kDSPLoShelfGain, 

kDSPHiShelfFreq, 

kDSPHiShelfGain, 

kDSPNotchlFreq, 

kDSPNotchlQ, 

kDSPNotchlCut, 

kDSPNotch2Freq, 

kDSPNotch2Q, 

kDSPNotch2Cut, 

kDSPHotchSFreg, 

kDSPHotch3Q, 

kDSPNotch3Cut, 

kDSPKrotch4F2:eq, 

kDSPMotch4Q, 

kDSPNotcli4Cut, 

kDSPNotchSFreq, 

kDSPNotchSQ, 

kDSPNotchSCut, 

kDSPPreVolume, 

kDSPBypass, 

kDSPLoCutof f Scale , 

kDSPLoCutoff Fc, 

kDSPLoCutof fQc, 

kDSPHiCutoff Scale, 

kDSPHiCutof fA2, 

kDSPHiCutoffAl, 

kDS PHDCDBypa s s , 

kDSPHDCDGainScaleOf f , 

kOSPDDXCompBypas s , 

kOSPNotchSFreq, 

kDSPNotcliSQ, 

kDSPNotchSCut, 

kDSPNotchTFreq, 

kDSPNotGh7Q, 

kDSPNotch7Cut, 

kDSPAnalogIn, 

kDS PAnalogVol , 

kDSPBypassMask, 

kDSPDelay, 

kDSPAllpassFreq, 

kDSPAllpassQ, 

kDSP2HiCutoff Scale , 

kDSP2HiCutoffA2, 

kDSP2HiCutofEAl, 

kDSPNotchSFreq, 

kDSPNotchSQ, 

kDSPNotcheCut, 

kDSPNotch9Freq, 

kDSPNotchSQ, 

kDSPNotchSC-ut , 

kDSPNotchAFreq , 

kDSPNotchAQ, 

kDSPNotchACut 



Sfdefine kDSPArraySize (kDSPNotchACut+l) 

// bit definitions for kDSPBypassMask above 
enum { 

kBypassNotchl, 

kEypassNotch2, 

kBypassKotcha , 

kBypa s sNotch4 , 

kBypassHipass, 

kBypassLopass, 

kBypassLoshelf , 
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kBypassHiShelf , 
kBypassConecry, 
kBypassAllpass , 
kBypassDBNotch, 
kBypassNLopass 

}; 
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#if ! defined (AFX DBNOTCH H 241CC3C5 14D3 11D3 96EE_ OOS0S7CDB9E2 IWCLUDED_) 

#define AFX DBNOTCH K 241CC3C5 14D9 11D3 9SEE OOg097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 
// DBNotch.h : header file 
// 

class CTabDialog; 

///////////////////////////////////////////////////////////////////////////// 
// CDBNotch dialog 

class CDBNotch : public CPropertyPage 
{ 

DEC1ARE_DYHCREATE (CDBHotch) 

/ / Coas tract ion 
public : 

CDBKotchO ; 

-CDBNotch ( ) ; 

// Dialog Data 

/ / { { AFX_DATA ( CDBNotch) 
enum { IDD = IDD_PP11 } ; 
CButton m_Bypass; 
CSliderCtrl tn_CompGainSlider ,- 
CSliderCtrl m_CompQSlider; 
CSliderCtrl m_QSlider; 
CSliderCtrl !n_FreqSlider ; 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

//{ {AFX_VIRTUAL (CDBNotch) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
/ / } } AFX_VIRTUA1 

// Implementation 
protected: 

// Generated message map functions 

//{ {afx_MSG (CDBNotch) 

afx_ntsg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ,- 

afx_msg void OnPaintO ; 

virtual BOOL OnlnitDialog C ) ; 

afx_msg void OnBypassO ; 

//}}AFX_MSG 

DECliARE_MESSAGE_MAP ( ) 

CTabDialog *tn_ParentWindow; 
void Sends tr ingToUI (int which); 

}; 

// { {afx_insert_location} } 

/ / Microsoft Developer Studio will insert additional declarations immediately before the previous line 
#endif // ! defined (AFX_DBNOTCH_H 241CC3CS 14D9 11D3 96EK 006097CDB9E2 INCLUDED ) 
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// DBNotch.cpp : implementation file 
// 



#include "stdafx.h" 

# include " s a . h " 

#include "DBNotch.h" 

# include "TabDialog.h" 

#include "DSP56kManager . h" 

#ifdef _DEBaG 
#define new DEBUG_NEW 
ifundef THIS_FILE 

static char THIS_FILE[] = FILE ; 

#endif 

///////////////////////////////////////////////////////////////////■////////// 
/ / CDBKotcli property page 

IMPLEMENT_DYNCREATE (CDBNotch, CPropertyPage) 

CDBNotch: :CDBNotch() : CPropertyPage (CDBNotch :: IDD) 
{ 

// ( {AFX_DATA_INIT (CDBNotch) 

// NOTE: the ClassWizard will add member initialization here 
//] )AFX_DATA_IN1T 

} 

CDBNotch-. : -CDBNotch. { ) 

{ 

) 

void CDBNotch: :DoDataExchange (CDataExchange* pDX) 
{ 

CPropertyPage: :DoDacaExchange (pDX) ; 
//{ {AFX_DATA_MAP (CDBNotch) 
DDX_Control(pDX, IDC_CHECK5, m_Bypass> ; 
DDX_Control (pDX, IDC_SLIDER6, m_CompGainSlider) ; 
DDX_Control (pDX, IDC_SLIDER5, m_CompQSlider) ; 
DDX_Control (pDX, IDC_SLIDER2, m_QSlider) ; 
DDX_Control(pDX, IDC_SLIDER1, m_FreqSlider) ; 
// } ) AFX_DATA_MAP 

} 



BEGIN_MESSAGE_MAP (CDBNotch, CPropertyPage) 
/ / { { AFX_MSG_MAP ( CDBNot ch) 
ON_WM_VSCROLL { ) 
ON_WM_PAINT C ) 

ON_BN_CLICKED ( IDC_CHECK5 , OnBypas s ) 
/ / } } AFX_MSG_MAP 
EIID_MESSAGE_KAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
// CDBNotch message handlers 

void CDBNotch: :OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 
{ 

// TOEO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *)pScxollBar; 
int which; 

CPropertyPage: :OnVScroll {nSBCode, nPos, pScrollBar) ; 
Sleep (SO) ; 

if ( slider == &m_FreqSlider ) 

which = kUotchSFreq; 
else if { slider == &m_QSlider ) 

which = JcNotchpQ; 
else if ( slider == S;m_CompQSlider ) 

which = kNotchSQ; 
else if{ slider == &m_CompGainSlider ) 

which = kNotcheCut; 00' 
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else 

return; 

g_DSPManager->SetParamValue (CONTROL_RANGE-slider->GetPos () , which) ; 
SendStringToUI (which) ; 

1 

void CDBNotch : : OnPaint ( ) 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_FreqSlider. SetPos (CONTROL_PJU;JGE-g_DSPManager->GetParamValue (3cNotch9Freq) ) ; 
m_QSlider.setPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kHotchSQ) ) ; 
m_CompQSlider . SetPos (C0NTR01,_RAHGE-g_DSPManager->GetParamValue (kNotchSQ) ) ; 
in_CompGainSlider .SetPos {CONTROL_RANGE-g_DSPManager-?GetParamValue (kNotchSCut) ) 

in_Bypass . SetCheck (g_DSPManager->GetBypassSection (kBypassDBNotch) ) ; 

//Do not call CPropertyPage :: OnPaint ( ) for painting messages 

} 

BOOL CDBNotch: :OnInitDialog{ ) 
{ 

CPropertyPage: : OnlnitDialog () ; 

// TODOi Add extra initialization here 
m_FreqSlider . SetRange { 0 , CONTROL_RANGE } ; 

m_FreqSlider. SetPos (CONTROL_RRNGE-g_DSPManager->GetParamValue (kKotchSFreq) ) ; 
m_FreqSlider.SetTicFreq( {CONTROL_RANGE+1) /16) ; 
m_QSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_QSlider. SetPos (COKTROL_RANGE-g_DSPManager->GetParamValue (kNotchSQ) ) ; 
m_QSlider.SetTicFreq( (COKTROL_RANGE+l) /16) ; 
m_CorapQSl ider . S e tRange { 0 , CONTROL_RANGE ) ; 

m_CompQSlider. SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kMotchSQ) ) ; 
m_CompQSlider.SetTicFreg{ (CONTROL_RANGH+l) /16) ; 
in_CompGainSlider . SetRange { 0 , CONTROIj_RANGE) ; 

m_CompGainSl ider .SetPos {C0NTROr,_RANGE-g_DSPManager->GetParamValue (kNotcheCut) > 
!U_CompaainSlider .SetTicFreg( (CONTROL_RANGE+l) /16) ; 



m_ParentWindow = (CTabDialog *) GetParent {) ->GetParent () ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

} 

void CDBNotch: : SendStringToUI (int which) 
{ 

CString str; 

g_DSPManager->GetStringValue {which, str) ; 
m_ParentWindow->SetStatusString (0, str) ,- 

} 



void CDBNotch: :OiiBypass () 
{ 

// TODO: Add your control notification handler code here 
int state = iti_Bypass.GetState () s 0x3; 

g_DSPManager->SetBypassSection (state, kBypassDBNotch) ; 

} 



// MainPage.cpp : implementation file 
// 



jtinclude "stdafx.h" 
Sinclude "sa.h." 
#include "MainPage.h" 

^include "TabDialog . h" 
#include "DSPSSkManager .h" 
#iaclude <;stdlib.h> 

#ifdef _DEBUG 
Ifdefine new DEBUG_NEW 
#tindef THIS_FILE 

static char THIS_FI1,E H = FILE^ ; 

#endif 

/////////////////////////////////////////////////////////;/////////////////// 

// CMainPage property page 

IMPLEMENT_DYNCREATE ( CMainPage , CPropertyPage ) 

CMainPage : : CMainPage { ) : CPropertyPage ( CMa inPage : : IDD ) 
{ 

//{ {AFX_DATA_rNIT (CMainPage) 
m_BypassCheckBox = FALSE; 
in_HDCDBypass = FALSE; 
tn_GainScaleBypass = FALSE; 
in_Analog Input = FALSE; 
//) }APX_DATA_INIT 

} 

CMainPage : : -CMainPage ( ) 

{ 

} 

void CMainPage: :DoDataExchange (CDataExchange* pDX) 
{ 

CPropertyPage: : DoDataExchange (pDX) ; 
/ / { ( AFX_DATA_MAP ( CMainPage ) 
DDX_Control(pDX, IDC_SLIDER8, ni_Delay) ; 
DDX_Control(pDX, IDC_SLIDER7, tn_AnalogVol) ; 
DDX_Control {pDX, IDC_BUTT0N1, tn_EesetAll) ; 
DDX_Control{pDX, IDC_SLIDER3 , tn_PreVolumeSlider) ; 
DDX_Contirol<pDX, IDC_SLIDER1 , m_VolumeSlider) ; 
DDX_Check (pDX, IDC_CHECia, m_BypassChec)cBox) ; 
DDX_Ciieck (pDX, IDC_CHECK2, ni_HDCDBypas s ) ; 
DDX_Check (pDX, rDC__CHECK3 , ni_GainScaleBypass ) ; 
DDX_Check{pDX, IDC_CHECK4, m_AnalogInput ) ; 
/ / } } AFX_DATA_MAP 

} 



BEGIK_MESSAGE_MAP C CMainPage , CPropertyPage ) 
//( {AFX_MSG_MAP (CMainPage) 
ON_WM_VSCROLL { ) 
OK_MM_SHOWMINDOW ( ) 

ON_BN_CLICKED ( IDC_CHECK1 , OnBypassBufctOn) 
ON_WM_PAINT() 

ON_BN_CLICKED ( IDC_CHECK2 , OnHDCDBypass ) 
ON_BN_CLICKED { IDC_CHECK3 , OnGainScaleBypass) 
ON_BN_CLICKED ( IDC_BUTTONl , OiiResetAll) 
OK_BN_CLICKED ( IDC_CHECK4 , OnAnaloglnput ) 
//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
// CMainPage message handlers 

void CMainPage: .-OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 
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{ 

// TODO: Add your message handler code here and/ or call default 
CSliderCtrl *slider = (CSliderCtrl *) pScrollBar ,- 
int which; 

CPropertyPage: :OnVScroll{nSBCode, nPos, pScrollBar) ; 
Sleep (SO) ; 

if ( slider == &m_VolumeSlider ) 

which = kMainVolume; 
else if <slider == &m_PreVolumeSlider) 

which = JcPre Volume; 
else if (slider == tin_AiialogVol) 

which = kAnalogVolume; 
else if -(slider == &m_Delay) 

which = kDelay; 
else 

re turn, - 

g_DSPMaiiager->SetParamValue (COKTROL_RANGE-slider->GetPos () .which) ; 
SendStringToUI (which) ; 

) 

BOOL CMainPage: :OnInitDialog() 

CPropertyPage: : OnlnitDialog ( ) ; 

// TODO: Add extra initialization here 
ni_VolumeSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_VolumeSlider .SetPos (CONTROL_EANGE-g_DSPManager->GetParamValue (kMainVolume) ) ■ 
m_VolumeSlider . SetTicFreq ( (C0NTR0L_RANGE+1) /IS) ; 
ra_VoluineSlider.SetPageSize(PG__CONTROD_AMT) ; 

m_PreVolumeSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_PreVolumeSlider.SetPos{CONTROL_RANGE-g_DSPManager->GetParamValue<kPreVolume) 
m_PreVolumeSlider. SetTicFreq ( (COHTROL_range+i) /is) ; 
m_PreVolumeSlider . SetPageSize (PG_COm'ROL_AMT) ; 

tn_AnalogVol . SetRange < 0 , CONTROL_RANGH ) ; 

m_AnalogVol.SetPos (CONTROL_RANGE-g_DSPKanager- >GetParamValue (kAnalogVolume) ) • 
tn_AiialogVol . SetTicFreq ( (CONTROL,_EANGE+l ) /IS) ; 
m_AnalogVol . SetPageSize ( PG_CONTROL_AMT) ; 

m_Delay. SetRange { 0 , CONTR0I._RaNGE ) ; 

m_Delay . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kAnalogVolume) ) • 
m_Delay. SetTicFreq ( (CONTROL_RANGE+l) /16) ; 
ra_Delay. SetPageSize {PG_CONTROL_AHT> ; 

W!_BypassCheckBox = false; 

in_ParentWindow = (CTabDialog *) GetParent ( ) - >GetParent () ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 



) 



void CMainPage: :OnShowWindow(BOOL bshow, UINT nStatus) 
CPropertyPage : : OnShowWindow (bShow, nStatus) ,- 
// TODO: Add your message handler code here 



void CMainPage : :0n3ypassButton() 

// TODO: Add your control notification handler code here 
m_BypaBsCheckBox = !ra_BypassCheckBox; 
g_DSPManager->SetBypass (m_BypassCheckBox) ; 



void CMainPage : : OnPaint ( ) 0052 
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{ 

CPaintDC dc(this); // device context for painting 



// TODO: Add your message handler code here 

m_VoiumeSlider.SetPos (CONTROL_RANGE-g_DSPManager- >GetPararciVs.lue (kMainVolume) ) ; 
m_PreVolumeSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue {kPreVolume) ) ; 
m_AnalogVol.SetPoE (CONTROL_RANGE-g_DSPKanager- >GetParamValiie (kAnalogVolume) ) ; 
ra_Delay. SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kDelay) ) ,- 

// Do not call CPropertyPage : : OnPaint ( ) for paintina messages 

) 

void CMainPage: : OxiHDCDBypas s () 
{ 

// TODO: Add your control notification handler code here 
m_HDCDBypass = !ni_HDCDBypass ; 
g_DSPManager->SetHDCDBypass {m_HDCDBypass) ; 

) 

void CMainPage: : OnGainScaleBypass ( ) 
{ 

// TODO: Add your control notification handler code here 
m_GainScaleBypass = !m_GainScaleBypass; 
g_DSPManager->SetHDCDGainScale (m_GainScaleBypass ) ; 

} 

void CMainPage: :OnResetAll{) 
{ 

// TODO: Add your control notification handler code here 
//MM 8/3/99 Added extra dialog warning. 

if( MessageBax{ "Are you sure you want to reset all parameters? ", "WARNING" , M3_YESN0) '. = IDYES ) 

re turn ; 
g_DSPManager->ResetAll() ; 

m_VolumeSlider. SetPos <CONTROL_RANGE-g_DSPManager- >GetParamValue (kMainVolume) ) ; 
m_PreVolumeSlider. SetPos (C0NTR0L_RANGE-9__DSPMajiager->GetParamValue (IcPreVolume) ) ; 
tn_AnalogVol. SetPos (COiMTROL_RANGE-g_DSPManager->GetParamValue (kAnalogVolume) ) ; 
ra_Delay. SetPos (CONTROIi_RAKGE-g_DSPMan.ager->GetPararoValue (kDelay) ) ; 

} 

void CMainPage : : OnAnaloglnput ! ) 
{ 

// TODO: Add your control notification handler code here 
m_AaalogInput = !ra_Analog Input; 
g_DSPManager->SetAnalogInput {m_AnalogInput) ; 

} 

void CMainPage: iSendStringToUI (int which) 
{ 

CString str; 

g_DSPKanager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString (0 , str) ; 

} 
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#if ! defined (AFX_MAINPAGE_H 904 63DA4_D5 2E_11D2_9SEE_0 0S097CDB9E2 ^INCLUDED_) 

Sdefine AFX_MAINPAGE_H 904 S3DA4_DS2E_11D2_9SEE_00 S097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 100 0 

tpragma once 
#endif 

// _MSC_VER >= 1000 

// MainPage.h : header file 

// 



class CTabDialog; 

1 1 1 1 1 11 1 1 1 ! 1 1 1 1 1 1 !l 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 III 1 1 1 1 1 III 1 1 1 11 1 11 1 1 11 f 1 1 / 1 1 1 U 1 1 1 / 1 1 1 / 1 1 1 

1 1 CMainPage dialog 

class CMainPage : public CPropertyPage 
{ 

DECLARE_DyNCREATE (CMainPage) 

// Construction 
public : 

CMainPage ( ) ; 

-CMainPage { ) 

// Dialog Data 

//{ {afX_DATA (CMainPage) 
enum { IDD = IDD_PP2 ) ; 
CSliderCtrl Tn_Delay; 
CSliderctrl ra_AaalogVol; 
CButton m_ResetAll; 
CSliderCtrl m_PreVolumeSlider; 
CSliderCtrl m_VolumeSlider ; 
BOOL m_BypassCheckBox; 
BOOL ni_HDCDBypass; 
BOOL ra_GainScaleBypass; 
BOOIj ra_Analoglnput ; 
//} )AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

// { {AFX_VIRTUAL (CMainPage) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG (CMainPage) 

afxjnsg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 
virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnShowWindow ( BOOL bshow, UINT nStatus) 

afx_msg void OnBypassButton ( ) ; 

afx_msg void OnPaint () ; 

af x_msg void OnHDCDBypass ( ) ; 

afx_ms3 void OnGainScaleBypass () ; 

afx_msg void OnResetAll () ; 

afx_msg void OnAnalog Input () ; 

//}}AFX_MSG 

DECLARE_HESSAGE_MAP { ) 

CTabDialog *m_ParentWindow ; 
void SendStringToUI (int which); 

private : 

0054 

//( {afx_insert_location) } 
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// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // 'defined (APX_MArNPAGE_H 90463DA4_D52E_11D2_96EE_006097CDB9E2 INCLUDED_) 
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// IZCIPortCotnm.h: interface for the I2CIPor tComra class. 
// 

///////////////////////////////////J////////////////////////////////// 

#if !defined(AFX_I2CIP0RTC0MM_H 33F9EF07_F6EF_11D2_96EE_006097CDB9E2 INCLUDED_) 

#de f ine AFX__1 2 C I PORTCOMM_H 3 3 F9 EF 0 7_FS EF_1 1D2_9 S EE_0 0 6097 CDB 9 E2 INCLUDED_ 

#if _MSC_VER >= 1000 
^pragma once 

#endif // _MSC_VER >= 1000 
tinclude "DSPComtn.h" 



enura { 

MI2C_STATE_CLOSED , 

M 1 2 C_S TATE_PEND ING_0 PEN , 

MI2C_STATE_0PEW, 

MI 2 C_STATE_PENDING_TX , 

MI2C_STATE_PENDIKG_RX 

}; 

#define MI2_BUFFER_SIZE (3*3000) // should be multiple of 3 

class I2CIPortCoiim : pui>lic DSPComra 
{ 

int in_state; 

int ni_error_code ; 

long m_TxReq; 

char m_tjc_buf fer [MI2_BUFFER_SIZE] ; 

long m_tx_write , ni_tx_read; 

long m_det ect ; 

BOOL m_get_detect; 

long m_retryCount ; 

BOOL. in_initialTry,- 

HWND m_HWnd ; 

piiblic : 

virtual EOOb IsTransmitting ( void) ; 
virtual long GetDetectState (void) ; 

virtual void MessageHandler (WPARAM iPortEventCode) ; 

virtual BOOL CheckState (void) ; 

I2CIPortCoromCHWND p) ; 

virtual ~I2CIPortCoinm() ; 

virtual long SandDSPWord (long) ; 

virtual long EendDSPMemory (char *,long>; 



#endif // 'defined (AFX_I2CIPORTCOMM_H 33F9EF07_F6EF_11D2_96EE_006097CDB9E2 INCLUDED_) 
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// I2CIPortComra. cpp : implementation of the I2CIPortComm class. 
// 

iiiiiiiinniiiiiiiiiuiiiiiiiiiiiiiiiiiiiiiiiiniiiiiiiniiiiiniiiii 

#include "stdafx.li" 
#include "sa.h" 
# Include " I2CIPortComm.h" 
Sinclude "COMPortChooser -h" 

#include "i2c200.h" 

static struct r2C_PR0P i2c; 

static I2CIPortComm *g_I2CComm = NULL; 

^define I2C_SLAVE_ADDRESS OxBO 

{(define I2C_MAX_AMOUNT (5*3) // don't send more than this in one-shot 

#define I2C_RETRY_C0UNT 0 

#ifdef _DEBUG 
#undef THIS_FILE 

static char THIS_FILE[]= FILE ; 

#define new DEBUG_NEW 
#endif 



//static int cb_niessage; 



void iPortMsgHandler (WPRRAM iPortEventCode) 
{ 

if( g_I2CComm ) 

g_I2CComm->MessageHandler (iPortEventCode) ; 

} 



////////////////////////////////////////////////////////////////////// 
// Construction/Destruction 

////////////////////////////////////////////////////////////////////// 

/*static BOOL wait_for_message (void) 

( 

long count ; 

while ( cb_message == -1 ) 
{ 

Sleep (100) ; 
count++; 

if ( coiint > 20 ) 
return ( false ) 

} 

return ( true ) ; 

VI 

laCIPortComni: tI2CIPortCotnm{HWND p) 
{ 

int r ; 

CCOMPortChooser dig; 
dig . DoModal ( ) ; 



m_error_code = 0 ; 

m_state = Mr2C_STATE_CL0SED ; 

m_T3CReq = 0; 

tn_tx_Mrite = TO_tx_read = 0 ; 
in_detect = 0; 
m_get_detect = false,- 
m_in.it ialTry = false; 
m_HWnd = p; 

i2c. comport = dig . which__port ; 

005' 
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iac.WmMsgNo = 0; 

i2c.pfCBF = iPortMsgHandler ; 
jfifdef NDEBUG 

iac.pcLogFileName = NULL; 
#else 

i2c.pcLogFileName = "log.txt"; 
tendif 

i2c . LogFileLevel = l; 
i2c.LogFileSize = 1000; 
i2c.HostSlaveAddr = OxSE; 
i2c.BusTiiiieOut = 1000; 

i2c.MasterBitRate =2; // 100 kHz 

i2c.MasterRxBufSize = 512; 
i2c.MasterTxBufSi2e = MI2_BUFFER_SIZE; 
i2c .MasterArbRetry =0; ' . 

x2c.SlaveRxGCEnabIe = 1; 
i2c.SlaveRxBufSize = 512; 
i2c.SlaveTxBufSize = 512; 

r = I2COpen([n_HWnd,AfxGetInstanceHandle() , &i2c> 
if( r ) 

m_error_code = 0x1000; 
m_state = MI2C_STATE_PENDXNG_0PEN; 
g_12CComm = this; 



I2CIPortCoinm; : -I2CIPortCoramC ) 
{ 

I2CClose() ; 
g_I2CComm = NULL; 

} 

long I2CIPortCotmti ; : SendDSPWord (long value) 



char buffer [3] ; 

if< m_state < MI2C_STATE_0PEN ) 
return ( OIj ) ; 

buffer [0] = (value » 16) & OxFF; 
buffer [1] = (value >> 8) & OxFF; 
buffer [2] = value & OxFF; 
return{ SendDSPMemorY(bu£fer, 3) ); 



long laciPortComm: :SendDSPMemory (char *data, long lea) 
{ 

// make sure the link is valid 
if< m_state < MI2C_STATE_0PEN ) 
return ( OL ) ; 

long rval = OL; 
long b; 

long tocopy , amount , f reespace ; 

// copy data into the tx buffer 

if( data ) 

{ 

f reespace = m_tx_read - m_tx_write; 
if( freespace <= 0 ) 

f reespace += MI2_buffer_SIZE; 
ASSERT ( (len + 3) <= freespace ); // not enough space in the buffer 

for( tocopy = len ; tocopy > 0 ; tocopy -= amount ) 

if( m_tx_write >= m_tx_read ) 005S 
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amount = MI2_BUFFER_SIZ;E - m_tx_write; 

} 

else 
{ 

amount = ro_tx_read - m_tx_write; 

) 

amount = min (amount, tocopy) ; 
meracpy(m_tx_buf f er+m_tx_write, data, amount) ; 
data += amount; 
ni._tx_write += amount; 
ra_tx_write %= MI2_BUFFER_SI2E; 

) 

} 

// attempt to send it 

if( m_state == MI2C_STATE_OPEN ) 

{ 

amount = m_tx_write - m_tx_read; 
// ASSERT( amount == ((amount / 3) * 3) ) ; 

if C amount < Q ) 

amount = MI2_BUFFER_SIZE - m_tx_read; 
// amount = (amount / 3) * 3; // Send complete DSP Words. 

amount = min (amount, 12 C_MAX_AMOUNT) ; // throttle 

b = I2CMasterTx(I2C_SLAVE_ADDRESS, (unsigned char *) m_tx_buf f er+m_tx_read , amount, 1) 
if( b == 0 ) 
{ 

ra_state = MI2C_STATE_?EITDING_TX; 
m_TxReq = amount ; 
if{ !m_initialTry ) 
{ 

m_retryCount = 0 ,- 
m_initialTry = true; 

1 

) 

else 
{ 

if( m_error_code == 0 ) 

m_error_code = b; 
ASSERT (b == 0) ; 

) 

} 

return ( rval ) ; 

} 

void I2CIPortComm: :MessageHandler (KPARAM iPortEventCode) 
{ 

struct I2C_PROP si2c; 
int r; 

long tx_count; 
long val; 

unsigned cliar buffer [10] ; 

switch ( m_6tate ) 
{ 

case MI2C_STATE_PENDING_0PEN : 

if ( iPortSventCode == I2C_OPEN_SUCCESSFUIi ) 
{ 

m_state = MI2C_STATE_0PEK; 
if ( m_tx_read ! = m_tx_write ) 
SendDSPMemory{NUIjL, OL) ; 

} 

else 

m_error_code = iPortEventCode; 
break; 

case MI2C_STATE_PENDING_RX: 

if( iPortEventCode == I2C_MRX_COMPLHTE ) 
{ 

r = I2CGetMasterRxMsg (3 , buffer) ; 
if( r == 3 ) 
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{ 

val = buffer [0] & OxFF; 
val « e ; 

val = val I {buffer [1] & OxFF) ; 

val 8 ; 

val = val I {buffer[2] & OxFF) ; 
TO_detect = val; 

} 

} 

//else 

// m_error_code = iPortEventCode; 
in_State = HI2C_STATE_OPEN; 
if ( m_tx_read. i= m_tx_write ) 

SendDSPMetnory (NULL, QL) ; 
break ; 



case MI2C_STATE_PENDING_TX: 

if { iPortEventCode == I2C_MTX_COMPLETE ) 
{ 

// MM 5/20/99 Don't call status here. 
// r = I2CGetStatus (£;si2c) ; 

// tx_count = si2c.MasterTxByteCount; 

tx_count = m_TxEeq; 

m_initialTry = false; 

} 

else 
{ 

ni_retryCount++ ; 

if ( in_retryCount > I2C_RETRy_C0UNT ) 
{ 

ni_diiitialTry = false; 
if ( m_error_code == 0 ) 

m_error_code = iPortEventCode; 
//ASSERT {m_retryCount I2C_RETRY_C0UNT) ; 
I2CClose() ; 

r = I2C0pen(m_HWnd, AfxGetlnstanceHandle O , Sci2c) ; 
ASSERT ( r == 0 ) ; 

m_state = MI2C_STATE_PEHDING_0PEN; 
return; 

} 

tx_count = 0 ; 

} 

m_State = MI2C_STATE_OPEN; 
m_tx_read tx_count; 
m_tx_read %= MI2_BUFFER_SIZE; 
if{ m_get_detect ) 
{ 

m_get_detect = false; 

r = I2CMasterExExt{I2C_SLAVE_ADDRESS,3,l,l) ; 
if( r ) 

{ 

if ( m_error_code == 0 ) 
m_error_code = r; 

} 

else 

m_state = MI2C_STATE_PENDING_RX; 

} 

else if ( in_tx_read ! = m_tx__write ) 

SendDSPMemory(NtrLL,OL) ; 
break ; 

/* case MI2C_STATE_PEMDING_TX: 

if{ iPortEventCode == I2C_MTX_C0MPLETE ) 
{ 

r = I2CGetStatUB (&si2c) ; 

if( TO_TxReq == si2c . MasterTxByteCount ) 

{ 

ra_state = MI2 C_STATE_OPEN ; 
ra_tx_read += ni_TxReq; 
m_tx_read %= MX2_B0FFER_SIZE; 

if{ m_tx_read [= m_tx_write ) H fl P' O 

SendDSPMeraory (NULL, OL) ; U U O U 
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} 

) 

else 
{ 

m_error_code = iPortEventCode; 
;ra_tx_read = ra_tx_write = 0; 
T[i_State = MI2C_STATE_0PEN; 
if { tn_tx_read ! = m_tx_write ) 
SendDSPMemory (NULL, OL) ; 

} 

break; */ 

} 



] 

BOOL. I2CIPortComm: :CheckState() 
( 

return ( m_state == MI2C_STATE_OPEN ) ; 

} 

long I2CIPortCoitm: :GetDetectState ( ) 
( 

long r,rval = 0; 

if ( m_erxor_code ) 
{ 

rval = -m_error_code ; 
m_error_code = 0 ; 

} 

else 
{ 

rval = ( m_deeect ) ? 1 ■. 0 ; 

} 

/*i£( m_state == KI2C_STATE_PENDING_TX ) 

m_get_detect = true ; 
else if( m_state == MI2C_STATE_OPEN ) 
{ 

r = I2CKasterRxExt (I2C_SLAVE_ADDRESS, 3, 1, 1) ; 
iEC r ) 

m_error_code = r; 
else 

m_Etate = MI2C_STATE_PENDING_RX; 

}*/ 

return ( rval ) ; 

1 

BOOL I2CIPortComm; : IsTransmitting ( ) 
{ 

return ( m_tx_write != m_tx_read ) ; 

} 
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#if ! defined (AFX_I2CDIALOG_H ^B5DS10ES_F7D5_11D2_96EE_0 0 6 097CDB9E2 INCLUDED_) 

Sdefine AFX_I2CDIALOQ H B5D510E6 F7D5 11D2 96EB 0OSQ97CDB9E2 INCI,UDED_ 

#if _MSC_VER >= 100 0 
#pragma once 

#endif // _MSC_VER >= 1000 
// I2CDialog.h : header file 
// 

///////////////////////////////////////////////////////////////////////////// 
// CI2CDialog dialog 

class CI2CDialog : public CDialog 
{ 

UINT m_tiTnerID; 
ine m_state; 

// Construction 
public: 

CI2CDialog (CHnd* pParent = NULL); // standard constructor 

// Dialog Data 

//{ {AFX_DATA (CraCDialog) 
enum { IDD = IDD_DrAL0a2 ) ; 

// NOTE: the ClassWizard will add data members here 
//} }AFX_DATA 



// Overrides 

// ClassWizard generated virtual function overrides 

//{ CAFX_VIRTUAL(CI2CDialog) 

public: 

virtual BOOL OnCmdMsg (UINT nlD, int nCode, void* pExtra, AFX_CMDHANBLERIKFO* pHandlerlnfo) ; 
protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 
//{ {AFX_MSG (CI2CDialog) " 
virtual BOOL OnXnitDialog <) ; 
afx_insg void OnTiraer (UINT nIDEvent) ; 
afx_msg void OnCloseO ; 
//}}AFX_MSG 
DECLARE_MESSAGE_MAP ( ) 

1; 

// { {AFX_rNSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
Sendif // ! defined {AFX_I2CDIALOG_H_B5D510E6_F7D5_llD2_9SEE_00SO97CDB9E2 INCLUDED_) 
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// I2CDialog .cpp : irapLemenCation file 
// 



#include "stdafx.h" 
#include "sa.h" 
#include " I2CDiaLog .h" 
#include "DSPSSkManager.h" 

#define TIMERID 55 

#ifdef _DEBUG 
ifdefine new DEBUG_NEW 
#uiidef THIS_FILE 

Static char TKIS_FILE[1 = FILE ; 

#endif 

///////////////////////////////////////////////////////////////////////;///// 

// CI2CDialog dialog 



CI2CDialog: :C3:2CDialog(CWnd* pParent /*=NXILL*/) 
: CDialog (CI2CDialQg; : IDD, pParent) 

{ 

// { (AFX_DATA_INIT (CI2CDialog) 

// NOTE: the ClassWizard will add member initialization here 
// } }AFX_DATA_INIT 

} 



void CI2CDialog : : DoDataExchange (CDataExchange* pDX) 
{ 

CDialog : : DoDataExchange (pDX) ,- 
// { {AFX_DATA_MAP {CI2CDialog) 

// NOTE: the ClassWizard will add DDX and DDV calls here 
//} )afx_data_map 

) 



BEGIN_MESSAGE_MAP {CI2CDialog, CDialog) 

// { {AFX_MSG_MAP (CI2CDialog) 

ON_WM_TIHSR ( ) 

ON_WM_CIX>SE ( ) 

//) }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
// CI2CDialog message handlers 

BOOL CI2CDialog: :OnInitDialog<) 
( 

CDialog: :OnInitDialog () ; 

// TODO: Add extra initialization here 
g_DSPMan.ager = new CDSPSSkManager (this- >m_hWnd} ; 

ra_timerID = 0 ; 

m_timerrD = SetTimer (TIMERID, 50 .NULL) ; 
ni_state = 0; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

} 

void CI2CDialog: :OnTimer {UINT nlDEvent) 
{ 

// TODO: Add your message handler code here and/or call default 
if{ nlDEvent == TIMERXD ) 
{ 

if( g_DSPManager->l6Ready() ) 

switch ( ra state ) 006, 
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{ 

case 0: 

g_DSPManager- >DownloadDSPCode {) ; 

m_state++,- 

break; 
case 1: 

g_DSPManager->ResetAll() ; 

EndDialog ( IDOK) ,- 

break ; 
default : 

EndDialog (IDOK) ; 

break; 

} 

} 

else if( g_DSPManager->GetHDCDKode 0 < 0 ) 
EndDialog (IDABORT) ; 

} 

else 
{ 

CDialog: :On.Timer (alDEvent) ; 

} 



} 



BOOL CI2CDialog: :OnCmdMsg(UINT nID, int nCode, void* pExtra, AFX_CMDHANDI.ERINFO* pHandlerlnf o) 
{ 

// TODO: Add your specialized code here and/or call the base class 
return CDialog: -.OnCmdMsg (nID, nCode, pExtra, pHandlerlnf o) ; 

) 

void CI2CDialog: :OnClose() 
{ 

// TODO: Add your message handler code here and/or call default 
if ( m_timerID ) 

KillTimer( m_timerID ) ; 

CDialog: :OnClose () ; 

} 
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8if 'defined (AFX_I2CCOMMERRORDIALOG_H_76C389E8_F889_11D2_9SEE_006097CDB9E2 INCLUDED 
Sdefxne AFX_I2CCOMMERRORDIALOG_H 76C3 8 9E8_F8 8 9_11D2_9 SEE_0 0 S097CDB9E2 INCLUDED_ 

ifie _MSC_VER >= 1000 
Spragma once 

Sendif // _MSC_VER >= 1000 

// I2CCoimiErrorDialog.h : header file 

// 



ii//if//ii/i//n/ii//ifiimfiin/j!/u/ifin/miii/iini/iiiiu/iiii[t/ii,i 

1 1 CI2CComraErrorDialog dialog 

class CI2CCotnmErrorDialog : public CDialog 

// Construction 
public : 

CI2CConunErrorDialog(CWnd* pParent = NULL); // standard constructor 

// Dialog Data 

// { { AFX_DATA (CI2CCommErrorDialog) 
enum { IDD = IDD_DIAL0G4 } ; 
CString m_ErrorCode; 
//}}AFX_DATA 



// Overrides 

/ / ClassWizard generated virtual function overrides 

// { {AFX_VIRTUAL <CI2CCoraniErrorDialog) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
// } } AFX_VIRTUAL 

// Implementation 
protected: 

/ / Generated message map functions 
// { {afx_MSG (CI2CCommErrorDialog) 
afx_msg void OnButtonl C) ; 
//) }AFX_MSG 
DECIARE_MESSAGE MAP ( ) 

}; 

/ / { {AFX_INSERT_LOCATION} ) 

// Microsoft Developer Studio will insert additional declarations i^nediately before the previous line. 
#endif // !defined(AFX_I2CCOMMERRORDIALOG_H_76C389E8_FB89_llD2_9eEE_00S0S7CDB9E2 INCLUDED ) 
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// I2CCotnmErrorDialog.cpp : implementation file 
// 

#include "stdafx.h" 
Sinclude "sa.h." 

#include "I2CCoTriiiiErrorDialog.h" 

#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

Static char THIS_F1LE[] = pile ; 

Sendif 

///////////////////////////////////////////////////////////////////////////// 
// CI2CCo!tmErrorDialog dialog 



CI2CCotiimErrorDialog: :CI2CConunErrorDialog(CWnd* pParent /*=fJUI,L*/) 
^ : CDialog {CI2CCorniiiErrorDialog; :IDD, pParent) 

// { { AFX_DATA_rNIT (CI2CComraErrorDialog) 
m_ErrorCode = _T ( " " ) ; 
// } } AFX_DATA_INIT 

} 



void CI2CCommErrorDialog: :DoDataExcharLge(CDataExchange* pDX) 

CDialog: iDoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CI2CCOTnmErrorDialog) 
DDX_Text (pDX, IDC_EDIT1, iii_ErrorCode) ; 
/ / } } AFX_DATA_MAP 

} 



BEGIN_MESSAGE_MAP (CI2CCommErrorDialog, CDialog) 

// { {AFX_MSG_MAP (CI2CCommErrorDialog) 

ON_BN_CLICKED (IDC_BUTTONl, OnButtonl) 

//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

If CI2CCo[iirnErrorDialog message handlers 

void CI2CCommHrrorDialog: : OnButtonl {) 

// TODO: Add your control notification handler code here 
EndDialog CIDCANCEL) ; 

} 
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// PEQParam.h: interface for the CPEQParam class. 

/////// f ////////////////////////////////////////////////// J //////////f 

#if ! defined (AFX_PEQPARAM_H_733FB7AB_4A49_11D3_96EE_006097CDB9E2 INCLUDED ) 
#define AFX_PEQPARAM_H 733FB7AB_4A49_11D3_9SEE_00S097CDB9E2 IKCLUDED_ 

#if _HSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 



typedef struct _biguadcoef 
{ 

float c[6]; //-bO,bl,b2,aO,al,a2 

} biquadcoef; 

class CPEQParam 
{ 



float m_Gain; // in dB {+ or 

float m_Q; // in Q units 

float ra_Frequen.cy,- // in Hz 

float m_San:.pleRate; // in Hz 

double m_pi ; 



public : 

void GetCoef (biquadcoef *) ; 

void GetAllpassCoef (biquadcoef *) ; 

void SetQ( float v) { m_Q = v; } 

void SetQ(CString Sstr) ,- 

void SetGain( float v) { in_Gain = v; } 

void SetGain(CString Sistr} ; 

void SetFreq<f loat v) { m_Freguency = v; } 

void SetFreg(CString &str) ; 

CPEQParam 0 ; 

virtual -CPEQParam () ; 

}; 

#endif // ! def ined(AFX_PEQPARAM_H_733FB7AB_4A49_llD3_9SEE_006097CDB9E2_INCLUDED_) 
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// PEQParam. cpp : implementation of the CPEQParam class. 
// 

iiiinfiiiiumiminiintiiiiiiiiniiiiniiinii/iiiui/miuuiii 



iinclude "stdafx.h" 

# include "sa.h" 

#include "PEQParam. h" 

#include <Etdio.h> 

#include <raath.h> 

#ifdef _DEBUG 
#undef THIS_Fir,E 

Static char THIS_FILE [] = FILE ; 

fdefine new DEBUG_NEW 
#endif 

////////////////////////////////////////////////////////////////////// 
// Construction/Destruction 

iiiiiiiiiiiiniiiiiiiniiiiiiiiininiiiiiiiimiiiiiiiiinniiiiinn 

CPEQParam: :CPEQParani() 

: m_Frequency ( 0 .5) ,m_Gain (0 . 0) ,m_Q (1 . 0) ,ni_SampleRate( 44100 . ) 

I 

m_pi = acos {-1 . ) ; 

} 

CPEQParam: : -CPEQParam ( ) 
{ 

} 

void CPEQParam: : SetGain(CString t str) 
{ 

float V; 

sscanf {str, "%f",£:v) ; 
rtijSain. = v; 

} 

void CPEQParam: : SetFreq (CString & str) 
{ 

float V; 

sscaaf {str, "%f ",&v) ; 
ni_Frequency = v; 

} 

void CPEQParam: :SetQ{CString & str) 
{ 

float v; 

sscanf (str, "%f ",S:v) ; 
ni_Q = v; 

) 



void CPSQParam: : GetAllpassCoef (biquadcoef *f) 

c 

double gamma, beta, wc, tbeta; 

double normFreg = m_FreqTiency/m_SampleRate ,- 

wc = m_pi*norr[iFreq; 
gamma = -cos{wc); 
tbeta = ■wc/(2*m_Q); 
if ( tbeta > m_pi/4 ) 

tbeta = tn_jpi/4 ; 
beta = (l.-tan(tbeta) )/ (l.+tan( tbeta) ) ; 

f->c[0) = (float) beta; // bO 
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f->c[l] = (float) (gamraa* (1+beta) ) ; // bl 



void CPEQParam: iGetCoef (biquadcoef *f) 



double M,L,- 
biquadcoef af; 

doijble gain = (float) pow (10 . , m_Gain/20 . } 

GetAllpassCoef (taf) ; 
M = (1. -gain) /2 . ; 
L = (1 . +gain) /2 . ; 

f-?c[0] = (float) (af .c[0] *M+1.) ; 

f->c[lj = (float) {af .c[l] *M+af .c [4] *L) ; 

f->cI2] = (float) {af .c[2] *M+af .c [5] *L) ; 

t->c [3] = af .cC3] ; 

f->c[4] = af .c[4] ; 

f->c[S] = af .c[5] ; 



// bO 
// bl 
// b2 



f->c [2] 
f->c[3] 
f->C [41 
f->c[5] 



1. ; 
1. ; 



f->c(11 ; 
(float) beta; 



// b2 
// aO 
// al 
// a2 



Sif !defined(AFX_NOTCHPAGE2_H_5C8994C7_E2A4_llD2_9SEE_006097CDB9E2_INCLUDED_) 
Sdef ine AFX_NOTCHPAGE2_H 5C8994C7_E2A4_11D2_96EE_006097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
ffpragma once 

ffendif // _MSC_VER >= 1000 
// NotchPage2.h : header file 
// 

class CTabDialog; 

///////////////////////////////////////////////////////////////////////////// 
// CKotchPage2 dialog 

class CNotchPage2 ; public CPropertyPage 
{ 

DECLARE_DYNCREATE {CN0tcllPage2) 

// Construction 
piiblic : 

CNotchPage2 {) ; 

-CNotchPage2 {) ; 

// Dialog Data 

// { {AFX_DATA (CNotchPage2 ) 
enum { IDD = IDD_PP9 } ; 
CButton ra_BypassSecondButton,- 
CButton m_BypassFirstButton.; 
CSliderCtrl m_SliderCut4 ; 
CSliderCtrl ni_SliderQ4 ; 
CSliderCtrl m_SliderFregiiency4 ; 
CSliderCtrl m_SliderCut3 ; 
CSliderCtrl ni_SliderQ3 ; 
CSliderCtrl m_SliderFrequency3 ; 
//))AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

// { {afx_VIRTUAL (CNotchPage2) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//})AFX_VIRTUAI, 

// Implementation 
protected: 

// Generated message map functions 

// { {AFX_MSG (CNotchPage2> 

afx_rasg void OnPaintO; 

virtual BOOL OnlnitDialog ( ) ; 

afx_TOsg void OnVScroll (UINT nSBCode, aiNT nPos, CScrollBar* pScrollBar) ; 
afx_rasg void OnBypassPirst () ; 
afx_msg void OnBypassSecondO ; 
//} )AFX_MSG 
DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow; 
void SendStringToUI {int which); 

}; 

// { {afx_insert_location} ) 

// Microsoft Developer Studio will insert additional declarations itimediately before the previous line. 
#endif // !defined(AFX_NOTCHPAGE2_H_SC8994C7_E2A4_llD2_9SEE_00S097CDB9E2__INCLtJDED ) 
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// NotchPage2 . cpp ; implementation file 
// 



^include "stdafx.h" 

#include "sa.h" 

ftinclude "KotchPage2 . h" 

^include "TabDialog . h" 

ifinclude "DSPSSkManager . h" 

#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

Static char THIS_FILE[] = FILE ,- 

#endif 

iiiii/i!i/iiiinn/n/iii/nmi/imim//n//ni!//ii/i//n/iiiinufiiii/i 

II CNotchPage2 property page 

IMPLEMEWT_DYNCREATE (CNotchPage2 , CPropertyPage) 

CNotchPage2 : :CKotchPage2 ( ) : CPropertyPage (CNotchPage2 : : IDD) 

// { {AFX_DATA_INIT (CNotchPage2 ) 
/ / } } AFX_DATA_IN I T 

} 

CNotchPage2 : : -CNotchPage2 () 



void CNotchPage2: :DoDataE3cchange{CDataExchange* pDX) 

CPropertyPage : : DoDataExchange (pDX) ; 
// { { AFX_DATA_MAP (CNotchPage2 ) 

DDX_Control (pDX, rDC_CHECKe, m_BypassSecondButton) ; 

rDC_CHECK5, m_BypassFirstButton) ; 
IDC_SLIDER6, ra_SliderCut4) ; 
IDC_SLXDER5, 
IDC_SLIDER4, 
IDC_SLIDER3, 
IDC_SLIDER2, 
IDC SLIDERl, 



} 



DDX_Control (pDX, 
DDX_Control <pDX, 
DDX_Control {pDX, 
DDX_Contro I (pDX , 
DDX_Coiitrol (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
//} }afx_data_map 



m_SliderQ4) ; 
in_SliderFreguency4) ; 
in_SliderCut3) ; 
m_SliderQ3) ,- 
m_SliderFrequency3) ; 



BEGIN_MSSSAGE_MAP (CNotchPage2 , CPropertyPage) 
// { {AFX_MSG_MAP (CKotchPage2 ) 
ON_WM_PAINT ( ) 
ON_WM_VSCROLL ( ) 

ON_BN_CLICKED ( IDC_CHECK5 , OnBypassFirst) 
0N_BN_CLICKED ( rDC_CHECK6 , OnBypassSecond) 
//} }AFX_MSG_MAP 
END_MESSAGE_MAP { ) 

l/lll/lllllllllllllllllllliiiiiiiiiiiiiiiiiiiiiiiiiii]!i,i,i,//ii,i,/j,/ji,/i 

II CNotchPage2 message handlers 

void CNotchPage2 : .- OnPaint ( ) 
{ 

CPaintDC dc{this); // device context for painting 
// TODO: Add your message handler code here 

m_SliderFreqruency3 .SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kNotchSFreq) ) 
m_SliderQ3 .SetPos (CONTROL_RANGE-g_DSPManager->GetPararaValue (kNotchSQ) ) • 
m_SliderCut3 .SetPos CCONTROL_RAMGE-g_DSPManager->GetParamValue (kNotcheCut) ) - 
m_SliderFrequency4 . SetPos (COKTROL_RAKGE-g_DSPManager->GetParamValue (kNotchVFreq) ) 
m_SliderQ4 .SetPos <CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch7Q) ) - 
ra_SliderCut4 . SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (3cNotch7Cut) ) ; 

m_BypassFirstButton.SetCheck(g_DSPManager->GetBypassSection(kBypassNotch3) ) • 
m_BypassSecondButton . SetCheck (g_DSPManager- >GetBypassSection CkBypassNotch4 ) )' ; 
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^ // Do not call CPxopertyPage : : OnPaint ( ) for painting messages 

BOOL CNotchPage2 : : OnXnitDialog ( ) 

CPropertyPage : : OnlnitDialog { ) ; 

// TODO: Add extra initialization here 
in_SliderFrequency3 . SetRange ( 0 , CONTROL_RANGE) ; 

m_SliderFreguency3 .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch6Freq) ) 
m_SliderFreguency3 .SetTicPreq{ {CONTROL_RANGE+l) /is) ; 
ra_SliderFrequency3 . SetPageSize < PG_CONTROL_AMT) ; 

tii_S 1 iderQ 3 . S e t Range { 0 , CONTROL_RANGE ) ; 

m_SliderQ3 .SetPos (CONTROL_RANGE-g_DSPManager- >GetParaniValue (kNotch6Q) ) ; 
m_SliderQ3 .SetTicFreq( ( C0NTR0L_RANGE+1 ) /16) ; 
m_SliderQ3 .SetPageSize ( PG_CONTROL_AMT) ; 

ra_SliderCut3 .SetRange ( 0 , CONTROL_RANGE ) ; 

m_siidercut3 .SetPos (CONTROL_RANGE-g_DSPManager->GetParaTOValue (kNotcheCut) ) ; 
tn_SliderCTit3 .SetTicFreq( <CONTROI,_RANGE+l> /IS) ; 
in_SliderCut3 . SetPageSize < PG_CONTROL_AMT) ; 

m_S liderFrequency4 . SetRange ( 0 , CONTROL_RAKGE) ; 

m_SliderFreguency4. SetPos (CONTROL_RANGE-g_DSPManager- >GetParainValue (kNotch7Freq) ) ; 
m_SlxderFrequency4.SetTicFreq( (CONTROL_RANGE+l ) /IS) ; 
m_EliderFrequency4 .SetPageSize (PG_C0NTR0L_AMT) ; 



m_SliderQ4 .SetRange (0,CONTROL_RANGE) ; 

m_SliderQ4 .SetPos CCONTROL_RANGE-g_DSPManager- >GetParamValue (kNotchTQ) ) ; 
iii_SliderQ4 . SetTicFreq( ( CONTROI,_RAHGE +1 ) /IS) ; 
ra_SliderQ4 .SetPageSize (PG_CONTROL_AMT) ; 

ni_SliderCut4 . SetRange {0 , C0KTR0L_RANGE) ; 

m_SliderCut4 .SetPos (CONTROL_RANGE-g_DSPManager->GetPararaValue {)cNotch7Cut) ) 
m_SliderCut4 . SetTicFreq ( ( C0NT.ROL_RANGE+ 1 ) /16) ; 
m_Sl iderCut 4 .SetPageSize {PG_CONTROL_AMT) ; 

m_ParentWindow = (CTabDialog *) Ge t Parent () ->Get Parent () ; 

return THQE; // return TRUE unless you set the focus to a control 
^ // EXCEPTION: OCX Property Pages should return FALSE 

void CNotchPage2: :Onvscroll(uiNT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = {CSliderCtrl *) pScrollBar ; 
int which; 



CPropertyPage: :OnVScroli(nSBCode, nPos, pScrollBar); 
Sleep (SO) ; 

if ( slider == S;ra_SliderFrequency3 ) 

which = kNotchSFreq; 
else if( slider == Scm_SliderQ3 ) 

which = kNotchSQ; 

else if( slider == &:m_SliderCut3 ) 

which = kNotchSCut; 
else if ( slider == &m_SliderFreguency4 ) 

which = )cNotch7Freq; 
else if ( slider == &Tn_SliderQ4 ) 

which = )cNotch7Q; 
else if( slider == &m_SliderCut4 ) 

which = 3cNotch7Cut; 
else 

return; 



g_DSPManager- >SetParamValue (CONTROL_RANGE-slider->GetPos ( ) which) • 
SendStringToUI (which) ; 
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void CNotchPage2: :SendStringToUr(int which) 
CString str; 

g_DSPManager->GetStringValue {which, str) ; 
in_ParentWindow->SetStatusString(o, str) ; 

) 

void CNotchPage2: tOnBypassFirst ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassFirstButtoii. GetState { ) & 0x3;- 

g_DSPManager->SetBypassSection{state, kBypassNotchS) ; 

} 

void CNotchPage2 : : OnBypass Second ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassSecondButton. GetState () & 0x3; 

g_DSPMana3er- >SetBypas sSection (state , kBypassNotch4 ) ; 

} 
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#if !define<i(AFX_NOTCHPAGEl_H_0CF7E208_D790_llD2_96EE_00S097CDB9E2 INCLUDED ) 
#define AFX_N0TCHPAGE1_H 0CF7E2 08_D790_11D2_96EE_0 06097CDBSE2^ INCLUDED 

#if _MSC_VER >= 1000 

#pragTHa once 

#endif // _MSC_VER >= 1000 
// NotchPagel.h : header file 
// 



ii//ii/m/mjn//f////!//!if//t/ji//!//if!mm/if/f//,i/ii,iff/iiiif,,fi, 

II CNotchPagel dialog 
class CTabDialog; 

class CNotchPagel : piiblic CPropertyPage 
DECLARE_DYNCREATE (CNotchPagel) 

// Construction 
public: 

CNotchPagel () ; 

-CNotchPagel () ; 



/ / Dialog Data 

// { {AFX_DATA (CNotchPagel ) 
enum { IDD = IDD_PP4 } ; 
CButton in_BYpassSecondButton; 
CButton m_BypassFirstButton; 
CSliderCtrl tn_SliderCut2 ; 
CSliderCtrl Tn_SliderQ2; 
CSliderCtrl in_SliderFrequency2 ; 
CSliderCtrl m_SliderCutl ; 
CSliderCtrl m_SliderQl ; 
CSliderCtrl m_SliderFrequencyl; 
//} }afx_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

// { {AFX_VIRTUAIi (CNotchPagel) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VXRTUAL 

/ / Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG(CNotchPagel) 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnVScroll (UINT nSBCode, UINT aPos, CScrollBar* pScrollBar) ; 

afx_msg void OnShowWindow (BOOL bShow, UINT nStatus) ; 

af x_msg void OaPaint ( ) ; 

afx_msg void OnBypassPirst ( ) ; 

af x_OTsg void OnBypassSecond ( ) ; 

//} }AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow; 
void SendStringToUKint which); 

); 

// { {afx_insert_i,ocation} } 

// Microsoft Developer Studio will insert additional declarations iamiediately before the previous line. 
#endif / / !def ined(AFX_NOTCHPAGHl_H_0CF7E208_D790_llD2_9SEE_006097CDB9E2_INCLUDED_) 



0074 



1 



// NotchPagel . cpp : implementation file 
// 



#iuclude "stdafx.h" 
# include "sa.h" 
#iiiclude "NotchPagel . h" 
#include "TaJbDialog .h" 
^include "DSPSSkManager .h" 

#ifdef _DEBUG 
Sdefine new DEBUG_NEW 
#undef THIS_FILE 

static char TKIS_FILH[1 = ^FILE ; 

#endif 

///////////////////////////////////////////////////////////////////////////// 
// CKotchPagel property page 

IMPLEMENT_DYNCREA.TE (CHTotciiPagel , CProper tyPage) 

CNotchPagel: :CNotchPagelC) : CPropertyPage (CNotchPagel : : IDD) 
{ 

//{ {AFX_DATA_INIT (CNotchPagel) 
/ / } } AFX_D ATA_INIT 

} 

CNotchPagel : ; -CNotchPagel ( ) 

{ 

} 

void CNotchPagel :: DoDataExchange (CDataExchange* pDX) 
{ 

CPropertyPage: :DoDataExchange (pDX) ; 
// { {AFX_DATA_N5AP (CNotchPagel) 

DDX_Control (pDX, IDC_CHECK6, m_BypaEsSecondButton) ; 
DDX_Control {pDX, IDC_CHECK5, m_BypassFirstButton) ; 
DDX_Control (pDX, IDC_SLIDER6, in_SliderCut2 ) ; 
DDX_Control (pDX, IDC_SLIDERS, m_SliderQ2) ; 
DDX_Control (pDX, IDC_SLIDER4, m_SliderFrequency2 ) ; 
DDX_Control(pDX, IDC_SI/IDER3 , m_SliderCutl) ; 
DDX_Control (pDX, IDC_SLIDER2, m_SliderQl) ; 
DDX_Control <pDX, IDC_sr,IDERl , m_SliderFrequencyl) ; 
// } } AFX_DATA_MAP 

} 



BEGIN_MESSAGE_MAP (CNotchPagel, CPropertyPage ) 
//{ {AFX_MSG_MAP (CNotchPagel) 
ON_WM_VSCROLL ( ) 
ON_WM_SHOVmiNDOW ( ) 
ON_WM_PAINT { ) 

ON_BN_CLrCKED ( IDC_CHECKS , OnBypassFirst ) 
ON_BN_CLICICED ( IDC_CHECK6 , OnBypassSecond) 
//}}AFX_MSG_MAP 
EKD_KESSAGE_MAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
// CNotchPagel message handlers 

BOOL. CNotchPagel : : OnlnitDialog 0 
{ 

CPropertyPage: : OnlnitDialog () ; 

// TODO; Add extra initialization here 
Tn_SiiderFrequencyl . SetRange ( 0 , CONTEOL_RANGE) ; 

m_SliderFrequencyl.SetPos {CONTROL_RANGE-g_DSPManager->GetPararaValue (JcNotchlFreg) ) 
m_SliderPretiaencyl.Set'ricFreq< (CONTROI._RANGE+l) /IS) ; 
m_SliderFreguencyl . SetPageSize (PG_CONTROL_AMT) ; 

m_SliderQl . SetRange { 0 , C0NTR01,_RANGE) ; 

m_SliderQl .SetPos (CONTROIj__RANGE-g_DSPManager->GetParaiiiValue (kKotchlQ) ) ; 
m_SliderQl . SetTicFreq ( <CONTROL_RANGE+1) /16) ; 
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ia_SliderQL . SetPageSize (PG_CONTROL_AMT) ; 
m_SliderCutl . SetRange {0, COKTROL,_RRNGE) ; 

m_SliderCutl . SetPos (CONTROI._RANaE-g_DSPManager->GetParamValue (kNotchlCut) ) ; 
m_SliderCutl .SetTicFreq( (CONTROIi_RANGE+l) /IS) ; 
in_SliderCutl . SetPageSize {PG_CONTROL_AMT) ; 

ra_SliderFrequency2 .SetRange (0,CONTROL_RANGE) ; 

m_SliderFrequency2.SetPos (COHTROL_RANGE-g_DSPMaaager->GetParamValue (kNotch2Freq) ) 
m_SliderFreqiaency2-SetTicFreq<(COKTROL_RANGE+l) /16> ; 
m_SliderFreciuency2 . SetPageSize (PG_CONTROL_AMT) ; 

m_SliderQ2 . SetRange (0 , C0NTROL_RANGE) ; 

m_SliderQ2 .SetPos (CONTROL_RAMGE-g_DSPManager->GetParamValue (kNotch2Q) ) ; 
m_SliderQ2 . SetTicFreqC (CONTROIi_RANGE+l) /16) ; 
m_SliderQ2 . SetPageSize (PG_CONTROL_AMT) ; 

m_SliderCut2 . SetRange ( 0 , CONTROL_RANGE) ; 

m_SliderCut2 . SetPos {CONTROL_EANGE-g_DSPManager- >GetParamValue (kKotch2Cut) > ; 
m_SliderCut2 .SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
m_SliderCut2 . SetPageSize ( PG_CONTROI._AMT ) ; 

m_ParentWindow = (CTabDialog *> GetParent {) ->GetParent 0 ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

} 

void CNotchPagel: :OnVScroll (UINT nSBCode, UINT nPos, CScroIlBar* pScrollBar) 
{ 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl * ) pScrollBar ; 
int which , - 

CPropertyPage : :OnVScroll {nSBCode, nPos, pScrollBar); 
Sleep (50) ; 

if ( slider == s=m_SliderFreguencyl ) 

which = kKotchlFreq; 
else if ( slider == S;tti_SliderQl ) 

which = kNotchlQ; 
else if ( slider == &m_SliderCutl ) 

which = kNotchlCut,- 
else if { slider == &tn_SliderFrequency2 ) 

which = kWotch2Freq; 
else if ( slider == &m_SliderQ2 ) 

which = kNotch2Q; 
else if ( slider == &ra_SliderCut2 ) 

which = kKotchaCut; 
else 

return; 

g_DSPManager->SetParamValue (CONTROL_RAIIGE-slider->GetPos () .which) ; 
SendStringToUI (which) ; 

} 

void CNotchPagel: ; OnShowWindow ( BOOL bshow, UINT nstatus) 
{ 

CPropertyPage : : OnShowWindow (bShow, nStatus) ; 
// TODO: Add your message handler code here 



void CNotchPagel: :OnPaint{) 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_SliderFrequencyl . SetPos {CONTROL_RANGE-g_DSPManager->GetParatnValue (kNotchlFreq) ) ; O fX*? 

m_SliderQl.SetPos(CONTROL_RANGE-g_DSPManager->GetParamValue(kNotchlQ) ) ; U U f l> 

m_SliderCutl . SetPos (C0NTROL_RANGE-g_DSPManager->GetParamValue (jcNotchlCut) ) ; 



m_SlxderFrequency2.SetPos(CONTROL_RANGE-g_DSPManager->GetParamValue(kNotch2Freg) > ; 
ra_SliderQ2 .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch2Q) ) - 
in_SliderCut2 .SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kNotch2CuC) ) ; 
m_BypassFirstButton.SetCheck(g_DSPManager->GetBypassSection{kBypassNotchl) )' ; 
in_BypassSecondButton.SetCheck (g_DSPManager->GetBypassSectioii(kBypassNotch2) ) ; 

// Do not call CPropertyPage : : OnPaint ( ) for painting messages 



void CNotchPagel : :SendStringToUI [int which) 



CString str; 

g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString(0, str) ; 

} 

void CNotchPagel :: OnBypassFirst () 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassFirstButton . GetState ( ) & 0x3; 

g_DSPManager->SetBypassSection (state, kBypassNotchl) ; 

} 

void CNotchPagel: : OnBypassSecond ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassSecondButton. GetState ( ) & 0x3; 

g_DSPManager->SetBypassSection(state,kBypassNotch2) ; 

} 
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#if ! defined {AFX_NEWCUTOFFPAGE_H E27 28 22 6_E02 6_11D2_3SEE_006097CDB9E2_INCLUDED_) 

#def ine AFX_NEWCUTOFFPAGE_H E272 8226_E02 6_11D2_9SEE_006097CDB9E2 INCL.UDED_ 

#if _MSC_VER >= 1000 
#pragma once 

#endif // _KSC_VER >= 1000 

// HewCutof f Page .h : header file 



///////////////////////////////////////////////////////////////////////////// 



// CNewCutof f Page dialog 

class, CNewCutoff Page : public CPropertyPage 
{ 

DECLARE_DYNCREATE (CNewCutof f Page) 

// Construction 
public: 

CNewCutof f Page () ; 

-CNewCutof f Page () ; 

// Dialog Data 

//{ {APX_DATA(CNewCutof fPage) 
enum { IDD = IDD_PP8 } ; 
CButton ro_BypassHI.opassButton; 
CSliderCtrl m_NewHiQSlider; 
CSliderCtrl m_NewHiFreqSlider ; 
CButton m_BypassLiopass3utton; 
CButton m_BypassHipassButton; 
CSliderCtrl in_HiQSlider ; 
CSliderCtrl m_HiFregSlider; 
CSliderCtrl ra_ljoQSlider ; 
CSliderCtrl m_LoFreqSlider ; 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 
//{ {afx_VIRTUAL (CNewCutof f Page) 
public : 

virtual BOOL OnSetActive ( ) ; 
protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
/ / } } AFX_VIR'roAL 

/ / Implementation 
protected: 

// Generated message map functions 

/ / { { AFX_MSG { CNewCutof f Page ) 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 
virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnShowWindow(BOOL bshow, UINT aStatus) ; 

afx_msg void OnPaintO ; 

afx_msg void OnBypassHipass { ) ; 

afx_tasg void OnBypassLopass () ; 

afx_msg void OnBypassKewLopass ( ) ; 

//}}AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

CTabDialog *in_ParentWindow; 
void SendStringToUI (int which); 



//{ {AFX_INSSRT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ! defined (AFX_NEWCUTOFFPAGE_H E2728226_E026_11D2_9€EE_006097CDB3E2 INCLUDED_) n <y fm ,r' 



II 



class CTabDialog; 



}; 
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// NewCutof f Page . cpp : implementation file 
// 



# include "stdafx.h" 
#include "sa.h" 
tinclude "NewCutof f Page. h" 
#iiiclude "TabDialog .h" 
ifinclude "DSPSSkManager.h" 

#ifdef _DEBUG 
ifdefine new DEBUG_NEW 
#undef THIS_FrLE 

static char THIS_FILEt] = FILE 

#endif 



///////////////////////////////////////////////////////////////////////////// 
// CNewCutof f Page property page 

IMPLEMENT_DYNCREATE (CNewCutof f Page , CPropertyPage) 

CNewCutof f Page: : CNewCutof f Page () : CPropertyPage (CNewCutof f Page : :IDD) 
( 

// { (AFX_DATA_INIT (CNewCutof f Page) 

// } } AFX_DATA_INIT 

} 



CNewCutof f Page: : -CNewCutof f Page ( ) 

{ 

} 



void CNewCutof f Page : :DoDataExchange (CDataExchange* pDX) 



CPropertyPage r : DoDataExchange (pDX) ; 



// { {AFX_DATA_MAP i 
DDX_Coiltrol <pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
/ / ) j AFX__DATA_MAP 



CNewCutof f Page) 

IDC_CHECK7, m_BypassNLopassButton) ; 
IDC_SI,IDER9, m_NewHiQSlider) ; 
IDC_SLIDER8, m_NewHiFreqSlider) ; 
IDC_CHECK5, ni_BypassL.opassButton) ; 
IDC_CH:ECK4, m_BypassHipassButton) ; 
IDC_SLIDER5, m_HiQSlider) ; 
IDC_SLIDER4, m_HiFreqSlider) ; 
IDC_SLIDER2, m_LoQSlider) ; 
IDC_SLIDER1, m._LoFreqSlider) ; 



BEGIN_MESSAGE_KAP (CNewCutof f Page, CPropertyPage) 
// { {AFX_MSG_MAP (CNewCutof f Page) 
ON_WM_VSCROI.L ( ) 
ON_WM_SH0WWINDOW { ) 
0N_WM_PAI1IT ( ) 

ON_BN_CIiICKED (IDC_CHECK4 , OnBypassHipass) 
ON_BN_CLICKED ( IDC_CHECK5 , OnBypassLopass) 
ON_BN_CLiICKED { IDC_CHBCK7 , OnBypas sNewLopas s ) 
//} }AFX_KSG_MAP 
EKD_MESSAGE_MAP { ) 

///////////////////////////////////////////////////////////////////////////// 
// CNewCutof f Page message handlers 

void CNewCutof f Page : :OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *)pScrollBar; 
int which; 

CPropertyPage: :OnVScroll(nSBCode, nPos, pScrollBar) ,- 
Sleep(50) ; 

if ( slider == tm_LoFreqSlider ) 
which = kLoCutoff Freq; 
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else if ( slider == &ni_LoQSlider ) 

■which = kXiOCutoEfQ; 
else if ( slider == &ni_HiPreqSlider ) 

which = kHiCutoff Freq; 
else if ( slider == &m_HiQSlider ) 

which = kHiCutoffQ; 
else if ( slider == £cm_NewHiFreqSlider ) 

-which = kHiCutof f 2Freg; 
else if ( slider == &m_NewHiQSlider ) 

which = kHiCutoff 2Q; 
else 

return; 

g_DSPManager->SetParamValue (CONTROL_RANGE-slider->GetPos () , which) ; 
SendStringToUI {which) ; 

} 

void CNewCutoffPage: : SendStringToUI (int which) 
{ 

CString str; 

g_DSPManager->GetStringValue (which, str) ,- 
m_ParentWindow->3etStatusString (0, str) ,- 

} 

BOOL CNewCutof f Page: : OnlnitDialog ( ) 
{ 

CPropertyPage : : OnlnitDialog () ; 

// TODO: Add extra initialization here 
m_I.oFreqS lider . SetRange ( 0 , CONTROL_RANGE ) ; 

m_LoFreqSlider . SetPos {COKTROL_RANGE-g_DSPManager- >GetParamValue (kLoCutof f Freq) > ; 
ra_LoFreqSlider .SetTicFreq( (CONTROL_RANGE+1) /IS) ; 
ra_l.oFreqSlider . SetPageSize {PG_CONTROL_AMT) ; 

m_I.oQSlider . SetRange { 0 , CONTROL_RANGE) ; 

TO_LoQSlider. SetPos {C0NTROL_RANGE-g_DSPManager->GetPararaValue (kLoCutoffQ) ) ; 
ra_I,oQSlider.SetTicFreq( (CONTROL_RANGE+1) /16) ; 
m_LoQSlider . SetPageSize C PG_CGNTROI._AMT) ; 

ra_HiFregSlider . SetRange (0 , CONTR0L_RANGS) ; 

ra_HiFreqSlider. SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue 0<Jffi Cutoff Freq) > ; 
■rnJIiFreqSlider. SetTicFreq( (COSITROL,_RANGE-f-l) /16) ; 
m_HiFreqSlider. SetPageSize (PG_C0NTR01=_AMT) ; 

m_HiQSlider . SetRange ( 0 , CONTROL,_RANGE) ; 

m_HiQSlider . SetPos (CONTROL_RaNGE-g_DSPManager- ?GetParamValue (kHiCutoffQ) ) ; 
m_HiQSlider.SetTicFreq( (CONTROL_EANGE+13 /IS) ; 
tn_HiQSlider . SetPageSize (PG_CONTROL_AMT) ; 

ni_HewHiFreqSlider. SetRange (0 , CONTROL_RANGE) ,- 

m_NewHiFreqSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParaTnValue (kHiCutoff 2Freq) ) 
m_NewHiFreqSlider.SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_NewHiPreqSlider . SetPageSize {PG_COtITROL_AMT) ; 

m_NewHiQSlider . SetRange (0 , CONTROL_RANGE) ; 

m_NewHiQSlider. SetPos (COt3TROL_RANGE-g_DSPManager-?GetParamValue (kHiCutoff 2Q) ) ; 
tn_NewHiQSlider.SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
ni_NewHiQSlider . SetPageSize{Pa_CONTROL_AMT) ; 

in_ParentWindow = (CTabDialog *) GetParent C) - >aetParent {) ,- 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

} 

void CNewCutoffPage: :OnShowWindow(BOOL bShow, UINT nStatus) 
{ 

CPropertyPage: : OnShowWindow (bShow, nStatus) ; 
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// TODO: Add your message handler code here 



BOOL CNewCutof fPage: rOnSetActive () 
{ 

// TODO: Add your specialized code here and/or call the base class 
return CPropertyPage : : OnSetActive <) ; 

} 

void CNewCutof f Page: lOnPaint () 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_LoFreqSlider.SetPos (C0NTROL_RANGE-g_DSPManager- >GetParamValue (kLoCutof f Freq) ) ; 
m_LoQSlider.SetPos (CONTROL_RAKGE-g_DSPManager->GetParamValue <kLoCutof fQ) ) ; 
m_HiFreqSlider.SetPos (C0NTROL_RANGE-g_DSPManager->GetPararaValue (kHiCutof f Freq) ) ; 
Tn_HiQSlider .SetPos (CONTEOL_RANGE-g_DSPManager->GetParamValue (kHiCutof fQ) ) ; 
m_NewHiFreqSlider.SetPos<CONTIlOL_RANGE-g_DSPManager->GetParamValue (kHiCutof f2Freq) ) 
m_NewHiQSlider. SetPos (C0NTROL_RAHGE-g_DSPManager->GetParamValue (kHiCutof f2Q) ) ; 

ra_BypassHipassButton.SetCheck(g_DSPManager->GetBypassSection(kBypassHipass)) ; 
ra_BypassLopassButton.SetCheck{g_DSPManager->GetBypassSection(kBypassLopass) ) ; 
m_BypassNLopassButton.SetCheck(g_DSPManager->GetBypassSection(kBypassNLopass) ) ; 
//Do not call CPropertyPage :: OnPaint ( ) for painting messages 



void CNewCutof f Page : :OnBypassHlpass {) 

// TODO: Add your control notification handler code here 
int state = m_BypassHipassButton .GetState ( ) & 0x3; 

g_DSPManager- >SetBypassSect ion (state, kBypassHipass) ; 

} 

void CNewCutof f Page : :OnBypassLopass ( ) 

// TODO: Add your control notification handler code here 
int state = m_BypassLopassButton. GetState () & 0x3; 

g_DSPManager- >SetBypassSect ion ( state, kBypassLopass ) ; 

} 

void. CNewCutof f Page : : OnBypassNewLopass () 

// TODO: Add your control notification handler code here 
int state = m_BypassNLopassButton. GetState ( ) & 0x3; 

g_DSPManager- >S e tBypa s sSect ion (state , kBypassNLopas s ) ; 

) 
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// Shelf EQParam.h: interface for the CShelf EQParam class. 
// 

iiiiiiiiiiiuiiiiiiniiiiiiiiiiiiiiiiiiiiiiiitiiiiiuiiiiiiiiiiiiiiin 



#if I defined (APX_ShelfEQPARAM_H 7 3 3FB7AB_4A4 9_aiD3_96EE_O0SO97CDB9E2 INCLaDED_) 

#define AFX_Shelf EQPARAM_H 733FB7AB_4A4 9_11D3_96EE_0060 97CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 

typedef struct _biquadcoef 
{ 

float c[S] ; • // b0,bl,b2,a0,al,a2 
} bicuadcoef; 
class CShelfEQParam 



float m_SampleRate ; // in Hz 
double m_pi ; 
bool m_HiShelf; 

public : 

void GetCoef (biguadcoef *) ; 

void GetAllpassCoef (biquadcoef *) ; 

void SetGain(float v} { m_Gain = v; } 

void SetGain (CString &str) ; 

void SetFreq (float v) { m_Frequency = v; } 

void SetFreq (CString &str) ; 

CShelfEQParam (bool hi) ■ 
virtual -CShelf EQParam () ; 



#endif // ! defined (AFX_ShelfEQPARAM_H 73 3FB7AB_4A4 9_11D3_96EE_00S0 97CDB9E2 INCLUDED_) 



float 
float 



ni_Gain ; 

ni_Frequency; 



// in dB (+ or -) 
// in Hz 
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// ShelfEQParara.cpp: implementation of the CShelCEQParam class. 
// 

//////// ///////////J ////////////////////////// ////////////// J J// /J//// 

^include "stdafx.h" 
#include "sa.h" 
#include "Shelf SQParam.h" 
#include <stdio.h> 
#include <math . h> 

#ifdef _DEBUG 
#undef THIS_FILE 

static char THIS_FILE [] = FILE ; 

#define new DEBUG_NEW 
Sendif 

////////////////////////////////////////////////////////////////////// 
// Construction/Destruction 

iiiiiuiii/iii/iu/ii/imimiiiiiiiiiiiiiiiiiiiiiiiiiiiiminiiiiij 

CShelfEQParam: : CShelf EQParam (bool hi) 

: m_Frequency(0 .5) ,ra_Gain (0 . 0) ^m_SampleRate (44100. ) ,m_HiShelf (hi) 

{ 

m_pi = acos (-1 . ) ; 

} 

CShelfEQParam: : -CShelfEQParam () 
{ 

} 

void CShelf EQParam: : SetGain (CString & str) 
{ 

float V; 

sscanf (str, «%f ", S:v) ; 
in_Gain = v; 

} 

void CShelf EQParami :SetFreq(CString & str) 
{ 

float V; 

sscanf (str, "%f",&v) ; 
m_Frequency = v; 

} 



void CShelfEQParam: iGetAllpassCoef (biquadcoef ♦£ ) 
{ 

double gamma, wc; 

double normFreq = ni_Frequency/ni_SampleRate/2 ; 
wc = injpi*normFreq; 

gamma = (tan(wc/2) -1) / (tan (wc/2) +1! ; 

if ( m_HiShelf ) 
{ 

f->c[0] = (float) gamma,- // bO 

f->c(l] = 1.0; // bl 

} 

else 
{ 

f->c[01 = (float) -gamma; // bO 

f->c[l] = -1.0; // bl 

} 

f->c[2] = 0; // b2 

f->c[3] =1.; // aO 

f->c[4] = (float) gamma; // al 
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f->c[5] = 0; 



// a2 



void CShelfEQParam: :GetCoef (biquadcoef 'f) 



double M,1j; 
biquadcoef af; 
double gain = 



(float) pow {10., m Gain/20.) 



GetAllpassCoef (Jcaf ) ; 
M = (1. -gain) /2 . ; 
L = (1 . +gain) /2 . ; 



f ->c [0] 
f->c[l] 
f->C [2] 
f->c[3] 
f->c[4] 
f->C [5] 



(float) 
(float) 
(float) 
af .c[3] , 
af -c [4] i 
af .c[5] ; 



(af .c[0] *M+L) ; // bO 

(af .c[l] *M+af .c[4] *L} ; //bl 
(af .c[2] *M+af .c[5] *L) ; // b2 



o 

m 

m 
si 

m 
m 

o 
m 

a 
a. 
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// saDlg.h .- header file 
// 

#if !defined(AFX SADLG H 33Dg3B0B DOBS 11D2 96EE 006097CDB9E2 INCLUDED_) 

#def ine AFX SADLG H 3 3D93B0B _D0B8_11D2 9SEE 006097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
#pragma once 

#endif // _MSC__VER >= LOGO 

///////////////////////////////////////////////////////////////////////////// 
// CSaDlg dialog 

class CSaDlg : pviblic CDialog 
{ 

// Construction 

piiblic : 

CSaDlg (CWnd* pParent = NULL); // standard constructor 

// Dialog Data 

// { {aFX_DATA< CSaDlg) 

enum { IDD = IDD_SA_DIALOG } ; 

// NOTE: the ClassWizard will add data members here 
//}}APX_DATA 

// ClassWizard generated virtual function overrides 

// { { AFX_VIRTUAL (CSaDlg) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ,- // DDX/DDV support 
//} }AFX_VIRTUAL 

// Implementation 
protected: 

HICON m_hIcon; 

// Generated message map functions 

//{ {AFX_MSG{ CSaDlg) 

virtual BOOL OnInitDialog{ ) ; 

afx_rasg void OnSysConnnand{UINT nID, LPARAM iParara) ; 

afx_msg void OnPaint { ) ; 

afx_msg HCtFRSOR OnQueryDraglcon { ) ; 

afx_msg void OnButtonlO ; 

afx_msg void OnButton2(); 

//) }AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

); 

//{ {afx_insert_location} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
Sendif // idefined^AFX SADLG H 33D93B0B DQB3 11D2 96EE_Q06097CDB9B2^ rNCLUDED_) 
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// saDlg.cpp : impLementation. file 
// 



#include "stdafx.h" 
# include "sa.h" 
Sinclude "saDlg.h" 

#include "unit_ppi . h." 
#include "functs.h" 
^include "TabDialog . h" 

#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE[1 = FILE_ 

#endxf 



static int cmd_delay = 1000; 
static int io_delay = 50; 



///////////////////////////////////////////////////////////////////////////// 
// CAboutDlg dialog used for App About 

class CAboutDlg : public CDialog 
{ 

public : 

CAboutDlg ( ) ; 

// Dialog Data 

//{ {AFX_DATA (CAboutDlg) 
enum { IDD = IDD_ABOUTB0X } ; 
//} }AFX_DATA 

// ClassWizard generated virtual function overrides 

//{ {AFX_VIRTUAL (CAboutDlg) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
// } }AFX_VIRTUAL 

// Implementation 
protected: 

//{{AFX_MSG (CAboutDlg) 

//} }afx_msg 

declare message map!) 



CAboutDlg : : CAboutDlg ( ) : CDialog ( CAboutDlg : : IDD) 



//{ {AFX_DATA_INIT[CAboutDlg) 
// } } AFX_DATA_INIT 



void CAboutDlg :: DoDataExchange (CDataExcIiange* pDX) 



CDialog: : DoDataExchange (pDX) 
// { {AFX_DATA_MAP (CAboutDlg) 
// } } AFX_DATA_MAP 



BEGIN_MESSAGE_MAP (CAboutDlg, CDialog) 
//{ {AFX_MSG_MAP<CAboutDlg) 

// No message handlers 
//]}AFX_MSG_MAP 

END_MESSAGE MAP ( ) 



///////////////////////////////////////////////////////////////////////////// 
// CSaDlg dialog 

CSaDlg: :CSaDlg(CWnd* pParent /*=NULL*/) 0086 
: CDialog ( CSaDlg :: IDD, pParent) 
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{ 

// { { AFX_DATA_INIT (CSaDlg) 

// NOTE: the ClassWizard will add member initialization here 
//} }AFX_DATA_INIT 

/ / Kot« that lioadlcon does not require a subsequent Destroylcon in Win32 
m_hrcon = AfxGetApp () ->LoadIcon (IDR_MAINFRAME) ,- 



void CSaDlg: :DoDataExchange {CDataExchange* pDX) 

CDialog: : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CSaDlg) 

// NOTE: the ClassWizard will add DDX and DDV calls he 
//} }AFX_DATA_MAP 



BEGIK_MESSAGE_MAP (CSaDlg, CDialog) 
//{ {AFX_MSG_MAP (CSaDlg) 
ON_WM_SYSCOMMAND ( ) 
ON_WM_PAINT ( ) 
ON_WM_QUERYDRAGICON ( ) 

ON_BN_CLICKED (IDC_BUTTONl, OnButtonl) 
ON_BN_CLICKED (IDC_BUTTON2 , OnButton2) 
//}}AFX_HSG_MAP 
END_MESSAGE MAP ( ) 



i//ii'in/ini/iii/uminnji/iif/i/miu//j/iji//i,,,/,if,,,,i,,,i,,iii,, 

If CSaDlg message handlers 

BOOL CSaDlg: :OnInitDialog() 
{ 

CDialog: :OnInitDialog () ; 

// Add "About..." menu item to system menu. 

// IDM_ABOUTBOX must be in the system command range. 
ASSERT ((IDM_ABOUTBOX & OxFFFO) == IDM_ABOUTBOX) ; 
ASSERT { IDM_ABOUTBOX < OxFOOO) ; 

CMenu* pSysMenu = GetSystemMenu (FALSE) ; 

if (pSysMenu ! = NULL) 

{ 

CString strAboutMenu; 

strAboutMenu. LoadString ( IDS_ABOUTBOX) ; 

if { I StrAboutMenu. I sEmptyO 1 

{ 

pSysMenu- >AppendMenu (MF_SEPARATOR) ; 
^ pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu); 

} 

// Set the icon for this dialog. The framework does this automatically 
// when the application's main window is not a dialog 
Setlcon(m_hlcon, TRUE); // set big icon 

SetXcon(m_hIcon, FALSE); // Set small icon 

// TODO: Add extra initialization here 

if( load_dll(>==falBe ) 

{ 

MeBsageBox(..UNIT_PPI not found in the system directory. Fix this and restart application."); 

} 

init_port_spi(l) ; 

Bet_cmd_delay_cnt_value (cmd_delay) ; 
8et_io_delay_cnt_value (io_delay) ; 

return TRUE; // return TRUE unless you set the focus to a control 



} 



void CSaDlg: :OnSyECommand(UINT nID, LPARAM iParam) 0 0 8 '1 

if ( (nID & OxFFFO) == IDM ABOUTBOX) 
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{ 

CAboutDlg dlgAbout; 
dlgAbout . DoModal ( ) ; 

} 

else 
{ 

CDiaiog: : OnSys Command (nID, iParam) ; 

} 

1 

// If you add a minimize button to your dialog, you will need the code below 
// to draw the icon. For MFC applications using the document/view model, 
// this is automatically done for you by the framework. 

void CSaDlg: -.OnPaint {) 

{ 

if CIsIconic () ) 
{ 

CPaintDC dc(this); // device context for painting 

SendMessage(WM_ICONERASEBKGND, (WPARAM) dc .GetSaf eHdc ( ) , 0) ; 

// Center icon in client rectangle 

int cxicon = GetSystemMetrics (SM_CXICON) ; 

int cylcon = GetSystemMetrics (SM_CYICON) ; 

CRect rect ; 

GetClientRectC&rect) ; 

int X = {rect. Width {) - cxicon +1) / 2; 
int y = (rect. Height 0 - cylcon + 1) / 2 ; 

// Draw the icon 

dc. Drawlcon (x, y, m_hIcon) ; 

} 

else 
{ 

CDiaiog: : OnPaint () ,- 

} 

} 

// The system calls this to obtain the cursor to display while the user drags 
// the minimized window. 
HCURSOR CSaDlg: :OnQueryDragIcon ( ) 
{ 

return (HCURSOR) ra_hIcon,- 

) 

void CSaDlg : : OnButtonl ( ) 
{ 

long tlong; 

tlong=spi_xchng24 (0XAA55AA) ; 
tlong=spi_xchiig24 (0x0) ; 

) 

void CSaDlg : : OnButtonS ( ) 
{ 

// long tlong; 
// 

// tlong=spi_xchng24 (0x654321) ; 
// tlong=Epi_xchng24 (0x0) ; 

CTabDialog dig; 

dig . DoModal ( ) ,- 

} 



0088 



3 



// sa.h : main header file for the SA application 



#if ! defined (AFX_SA_H 33D93B09_DOB8_llD2_96EE_0Oe097CDB9E2 INCLUDED ) 

#define AFX_SA_H_33D93B09_DOB8_11D2_9SEE_006097CDB9E2 INCLUDED ~ 

#if _MSC_VER >= 1000 
#pragTtia once 

#endif // _MSC_VER >= 1000 

#ifndef ^AFXWIN_H 

#error include 'stdafx.h' before including this file for PCH 
#endif 



#include "resource. h" // main symbols 

///////////////////////////////////////////////////////////////////////////// 

// CSaApp: 

// See sa.cpp for the implementation of this class 
// 

class CSaApp : public CWinApp 
{ 

public : 

CSaApp 0 ; 

// Overrides 

// ClassWizard generated virtual function overrides 
/ / { { AFX_VI RTUAL ( CSaApp ) 
public : 

virtual BOOL Initlnstance ( ) ; 

//} }AFX_VIRTUAL 

// Implementation 

//{ {AFX_MSG (CSaApp) 

// NOTE - the ClassWizard will add and remove member functions here. 
// DO NOT EDIT what you see in these blocks of generated code 1 

//} }afx_msg 
declare_message_map { ) 

}; 

///////////////////////////////////////////////////////////////////////////// 

// { {afx_insert_location} } 

// Microsoft Developer Studio will insert additional declarations iramediately before the previous line. 
#endif // ! defined (AFX_SA_H_33D93B09_DOBe_llD2_9SEH_006097CDB9E2 INCLUDED ) 
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// sa.cpp : Defines the class behaviors for the application. 



#include "stdafx.h" 

#include "sa.h" 

Sinclude "saDlg.h" 

Sinclude "TabDialog.h" 

#include " I2CDialog . h" 

#include "DSPSSkManager .h" 

CDSP563cManager *g_DSPManager ; 

#ifdef _DEBUG 
Sdefine new DEBUG__NEW 
#undef THIS_FILE 

static char THIS_FILE[] = FILE ; 

#endif 

///////////////////////////////////////////////////////////////////////////// 
If CSaApp 

BEGIN_MESSAGE_MAP(CSaApp, CWinApp) 
// { {AFX_MSG_MAP (CSaApp) 

// NOTE - the ClassWizard will add and remove mapping macros here. 
// DO NOT EDIT what you see in these blocks of generated code' 
//) }AFX_MSG 

ON_COMMAND { ID_HELP , CWinApp : : OnHelp ) 
EMD_KESSAGE_MAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
// CSaApp construction 

CSaApp: : CSaApp () 
{ 

// TODO: add construction code here, 

// Place all significant initialization in Initlnstance 



ii/ni//iiii/iiinmi/nni/ni//ii/jf/ji/uuii/i//iifii/jif/ii/i,,/i,,,i,, 

II The one and only CSaApp object 
CSaApp theApp; 

ii//iiiiiiiiiiiiiiiniiiiiiiiiiiiiiiiii/iiii/i/jf /If /,///,//,,,, f,/ J fijj,/ 

II CSaApp initialization 

BOOti CSaApp: : Initlnstance < ) 
{ 

AfxEnableControlContainer () ; 
// Standard initialization 

//If you are not using these features and wish to reduce the size 
// of your final executable, you should remove from the following 
// the specific initialization routines you do not need. 

#ifdef _AFXDLL 

Enable3dControls() ; // Call this when using MFC in a shared DLL 

#else 

Enable3dControlsStatic<) ; // Call this when linking to MFC statically 
#endif 

/ / Set dialog background color to black 
// SetDialogBkColor(RG3(0, 0, 0) , RGB (255 , 255 , 255 ) ) ; 

int response; 
Cl2CDialog idlg; 
try 
{ 

if( {response = idlg . DoHodal ( ) ) != IDOK ) 0000 
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if< response == idabort ) 
{ 

AfxMessageBox(" Trouble initializing") ,- 
Sleep (1000) ; 

} 

// return FALSE; 

) 

} 

catch (CException* e j 
{ 

// printf ("Trouble initializing\n") ; 

// Sleep(lOOQ) ; 

return FALSE; 

■ }- 



// CSaDlg dig; 
CTabDialog dig; 

Tn_pMainWnd = Sidig; 

int nResponse = dig .DcModal ( ) ; 

if (nResponse == IDOK) 

{ 

// TODO: Place code here to handle when the dialog is 
// dismissed with OK 

} 

else if (nResponse == IDCANCEL) 
{ 

// TODO: Place code here to handle when the dialog is 
// dismissed with Cancel 

} 

// Since the dialog has been closed, return FALSE so that we exit the 
// application, rather than start the application's message pump, 
return FALSE; 
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//{ {NO_DEPENDENCrES} } 

// Microsoft Developer Studio generated include file. 

// Used by sa . rc 

// 



#def ine 


IDM_ABOUTBOX 


0x0010 


#def ine 


IDD_ABOUTBOX 


100 


#def ine 


IDS_ABOUTBOX 


101 


#def ine 


IDD_SA_DIALOG 


102 


#def ine 


IDR_MAINFRAMS 


128 


#def ine 


IDD_DIALOGl 


129 


#def ine 


IDD_PP1 


130 


#def ine 


IDR_MENU1 


130 


#def ine 


IDD_PP2 


131 


#def ine 


IDD_PP3 


132 


#def ine 


IDD_PP4 


133 


#def ine 


IDD_PP5 


134 


#de f ine 


IDD_PP6 


135 


#def ine 


IDD_PP7 


136 


#def ine 


IDD_PP8 


137 


#de f ine 


IDD_PP9 


138 


#def ine 


IDD_DIALOG2 


139 


#def ine 


IDD_DIALOG3 


140 


#def ine 


IDD_DIALOG4 


141 


#def ine 


IDD_PP10 


142 


#def ine 


IDD_PP11 


143 


#def ine 


IDC_BUTT0N1 


1001 


#def ine 


IDC_BUTTON2 


1O02 


#def ine 


IDC_SI.IDER1 


1004 


#def ine 


IDC_CHECK1 


1005 


#def ine 


IDC_SLIDER2 


1005 


#def ine 


IDC_SLIDER3 


1006 


#def ine 


IDC_RADI01 


1006 


#def ine 


IDC_SLIDER4 


1007 


#de£ine 


IDC_CHECK2 


1007 


#def ine 


IDC_RADI02 


1007 


#def ine 


IDC_EDIT1 


1007 


#def ine 


IDC_SIiIDER5 


1008 


#def ine 


IDC_CHECK3 


1008 


#def ine 


IDC_RADI03 


1008 


#def ine 


rDC_SLIDERS 


1009 


#def ine 


IDC_CHECK4 


1009 


#def ine 


IDC_RADI04 


1009 


# define 


IDC_SriIDER7 


1010 


#def ine 


IDC_CHECKS 


1010 


#def ine 


IDC_SLIDER3 


1011 


# define 


IDC_CHECK6 


1011 


#def ine 


IDC__SL1DER9 


1012 


#def ine 


IDC_CHECK7 


1013 


#def ine 


ID_MENUITEM3 2 771 


32771 


#def ine 


ID_MEKUITEM32 772 


32772 


#def ine 


rD_FILE_EXPORTPARAMFILE 


32773 



// Next default values for new objects 
// 

#ifdef APSTUDIO_rNVOKED 

#ifnde£ APSTUDIO_REAlX)NLY_SYMBOLS 

#define _APS_NEXT_RESOURCE_VALUE 

#define _APS_NEXT_C0MMAND_VALUE 

Sdefine _APS_NEXT_CONTROL_VALUE 

#define _APS_NEXT_SYMED_VALUE 

#endif 

#endif 



142 
32774 
1011 
103 
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#if ! defined {AFX_TABDIALOG_H 5CB3DF04_D2 0F_11D2_96EE_006097CDB9E2 INCLUDED_) 

#def ine AFX_TABDIALOG_H 5CB3DF04_D2 OF_11D2_96EE_006 097CDB9E2 INCLUDED 

Sif _MSC_VER >= 1000 

ffpragraa once 

Sendif // _MSC_VER >= lOOO 
// TabDialog.h : header file 
// 



#include 
if include 
ffinclude 
#include 
#include 
(finclude 
ff include 
#include 
tin elude 
# include 



" Pagel.h" 
"MainPage .h" 
" DDX.h" 

"NotchPagel .h" 
"NotchPage2 . h" 
"StWaveRejPage.h" 
"ShelvPage .h" 
"NewGutof f Page . h" 
"AllpassPage -h" 
"DBNotch.h" 



///////////////////////////////////////////////////////////////////////////// 
// CTabDialog dialog 



Class CTabDialog : public CDialog 
{ 

// Construction 
public : 

void DisplayI2CState<long error); 

virtual void SetStatusString ( int which, CString &s) ; 
CTabDialog (CWnd* pParent = NULL) ; // standard constructor 

// Dialog Data 

// { { AFX_DATA (CTabDialog) 
enum { IDD = IDD_DIALOGl } ; 

// NOTE: the ClassWizard will add data members here 
//} }AFX_DATA 



// Overrides 

// ClassWizard generated virtual function overrides 

// { {AFX_VIRTUAL (CTabDialog) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 

//} }AFX_VIRTUAL 

/ / Implementation 
protected: 

virtual void DisplayMode (int) ,- 



CStatusBar 


ni_ 


_StatusBar; 


CPropertySheet 


m_ 


_dlgPropSheet ; 


HICON 


m_ 


_hIcon; 


// CPagel 




m_Pagel; 


CMainPage 


m_ 


_MainPage ; 


CDDX 


m_ 


_DDXPage; 


CNotchPagel 


m_ 


NotchlPage ,- 


CNotchPage2 


ra_ 


_Notch2Page; 


CStWaveRe j Page 


m_ 


_StWaveRe j Page ; 


CShelvPage 


m_ 


_Sh.elvPage; 


// CCutoffPage 




m_Cutof f Page; 


CNewCutof f Page 


m_ 


_CutoffPage; 


CAllpassPage 


m_ 


_A1 Ipas s Page ; 


CDBMotch 


m_ 


_DBNotch; 


CBrush 


iti_ 


_brush; 


UINT 


m 


_tiraerID,- 


BOOL 


m_ 


_HDGDDisplay; 


int 


m_ 


_AIdx,m_ICnt; 


int 


m_ 


_ErrorCounter ; 



// Generated message man functions 
// { { AFX_MSG (CTabDialog) " 
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virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnSysComniand (UINT nID, LPARAK IParam) ; 

afx_msg void OnPaintO ; 

af x_msg HCURSOR OnQueryDraglcon { ) ,- 

afx_msg void OnCloseC); 

afx_nisg void OnMove{int x, int y) ; 

afx_msg HBRUSH OnCtlColor {CDC* pDC, CWnd* pWnd, UINT nCtlColor) ; 

af x_rasg void OnOperLMenu ( ) ; 

afx_msg void OnSaveMenuO ; 

afx_msg void OnTimerCUIHT nID Event ) ; 

afx_msg void OnFileExportparamf ile ( ) ,- 

//) }AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

}; 

// { {afx_insert_location} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // !def ined(AFX_TABDIALOG_H_5CB30FO4_D2OF_llD2_96EE_OOSO97CDB9E2 INCUJDED_) 
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// TabDialog.cpp : implementation file 
// 

Sinclude "stdafx.h" 
# include "sa.h" 
#include "TabDialog.h" 
#include "DSP561cManager .h" 
#include "I2CCommErrorDialog.h" 
#include <afxdlgs.h> 

Sifdef _DEBUG 
#define new DEBUG_HEW 
#undef THIS_FILE 

static char THIS_FIL.E[] = FILE ; 

#endif 



#de£ine TIMERID X 

#define I D_HDCD_DETECT 56000 

Sdefine ID_ERROR_DISPIAY (1D_HDCD_DETECT+1) 

static UINT auIDStatusBar [] = { 
ID_SEPARATOR, 
ID_HDCD_DETECT , 
ID_SHPARATOR , 
ID_ERROR_D I S PLAY 

}; 



#define AARRAYSIZE 16 

static char *Detect_Array [AARRAYSIZE] = { 

" HDCD", 

" HDCD " , 

" HDCD " , 

" HDCD "' , 

" HDCD " , 

" HDCD " , 

" HDCD 

" HDCD " , 

" HDCD 

" HDCD 

" HDCD " , 

« HDCD 

"HDCD " , 

"DCD H", 
"CD HD" , 

"D HDC" 

}; 



///////////////////////////////////////////////////////////////////////////// 

// CTabAboutDlg dialog used for App About 

class CTabAboutDlg : public CDialog 
{ 

public : 

CTabAboutDlg { ) , 

II Dialog Data 

// { {AFX_DATA (CTabAboutDlg) 
enura { IDD = IDD_ABOUTBOX } ; 
//}}AFX_DATA 

// ClassWizard generated virtual function overrides 

// { (AFX_VIRTUAL (CTabAboutDlg) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//})AFX_VIRTUAIi 

// Implementation H H Q f-'^ 

protected: U U O 

// { {AFX_MSG (CTabAboutDlg) 
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//) }afx_msg 
deciiare_message_>4ap ( ) 



CTabAboutDlg: :CTabAboutDlg() : CDialog (CTabAboutDlg: : IDD) 

// { {AFX_DATA_INIT (CTabAboutDlg) 
//) }AFX_DATA_INIT 



void CTabAboutDlg: :DoDataExchange<CDataExchaiige* pDX) 

CDialog: :DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CTabAboutDlg) 
/ / } ) AFX_DATA_MAP 



BEGIN_MESSAGE_MAP (CTabAboutDlg, CDialog) 

//{ {AFX_MSG_MAP (CTabAboutDlg) 
//No message handlers 

/ / } ) AFX_MSG_MAP 
END_MESSAGE_MAP { ) 

///////////////////////////////////////////////////////////////////////////// 

// CTabDlalog dialog 



CTabOialog: :CTabDiaiogCCWnd* pParent /*=NULL*/) 
: CDialog (CTabOialog :: IDD, pParent) 

( 

//{ {AFX_DATA_INITCCTabDialog) 

// NOTE: the ClassWizard will add metnber initialization here 
//) }AFX_DATA_IKIT 

m_hICOn = AfxGetApp ( ) ->LoadICOn (IDE_MAINFRAME) ; 



void CTabOialog: :DoDataExchange(CDataExchange* pDX) 

CDialog: :DoDataExchange (pDX) ; 
//{ {AFX_DATA_MAP (CTabDlalog) 

// NOTE: the ClassWizard will add DDX and DDV calls here 
/ / } } AFX_DATA_MAP 

} 



BEGIN_MESSAGE_MAP (CTabDlalog, CDialog) 
// ( {AFX_MSa_MAP (CTabOialog) 
ON_WM_SYSCOMMAND ( ) 
ON_WM_PAINT ( > 
0K_WM_QUERYDRAGIC0N ( ) 
ON_WM_CLOSE ( ) 
01I_WM_MOVE { ) 
ON_WM_CTLC0LOR ( ) 

OK_COMMAND { ID_MENUITEM3 2771, OnOpenMenu ) 
ON_COMMAND ( ID_MENUITEM3 27 72, OnSaveMenu) 
ON_WM_TIMER ( ) 

ON_COMMAMD { ID_FILE_EXPORTPARAMFILE , OnFileExportparamf ile) 
//}}AFX_MSG_MRP 
END_HKSSAGE_KAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
// CTabOialog message handlers 

#define PS_WIDTH 222 
#define PS_HEIGHT 215 

BOOL CTabDlalog: :OnInitDialog 0 



int partsListt] = { 50, 100, 150, -l}; 
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CDialog: -. OnlnitDialog ( ) ; 



// Add "Atoout..." menu item to system menu. 



// rDK_ABOUTBOX must be in the system command range. 
ASSERT ( (IDM_AB0UTBOX & OxFFFO) == IDM_AB0UTBOX) ; 
ASSERT (IDM_ABOUTB0X < OxFOOO) ; 

CMenu* pSysMenu = GetSystemMenu ( FALSE) ; 

if (pSysMenu 1= NULL) 

{ 

CString strAboutMenu; 

s trAboutMenu. Loads tring(lDS_ABOUTBOX) ; 

if {! StrAboutMenu. IsEmptyO ) 



// build brush 

m_brusli.CreateSolidBrush(RGB(0, 0, 0) ) ; 
// build prop sheet 

m_dlgPropSheet.AddPage (&in_MainPage) ; 
nV-dlgPropSheet.AddPage (&m_DDXPage) ; 
m_dlgPropSheet .AddPage (&m_ShelvPage! ; 
in_dlgPropSheet .AddPage (tm_Cutof f Page) ; 
m_dlgPropSheet .AddPage {£;m_NotchlPage) ; 
m_dlgPropSheet. AddPage (&m_Notch2Page) ; 
m_dlgPropSheet .AddPage (£:m_StWaveRej Page) ; 
in_dlgPropSheet .AddPage (&m_AllpassPage) ; 
n\_dlgPropSheet .AddPage {&m_DBNotch) ; 

m_dlgPropSheet. Create {this, WS_CHILD | ws_VISIBLE, 0) ,• 
m_dlgPropSheet .Modif yStyleEx ( 0 , WS_HX_C0NTROLPARENT) ; 
ni_dlgPropSheet . Modif yStyle ( 0 , WS_TABSTOP) ; 

m_dlgPropSheet.SetWindowPos(KULL, 0, 0, PS_WIDTH, PS_HEIGHT, SWP_N020RDER | SWP_NOSIZE | SWP_NOACTIVATE ) 

// resize dialog to fit propsheet exactly 
RECT rect; 

m_dlgPropSheet.GetWindowRect (&rect) ; 
//rect. bottom += 14; 
//rect. right += 14; 

SetWindowPos(£=wndBottom, rect. left, rect. top, rect. right, rect. bottom, SWP_NOZORDER | swp_N0M0VE ); 

// Add status bar 

RECT sizerect; 

sizerect.top = PS_HEIGHT; 

sizerect .bottom = sizerect.top + 20; 

sizerect. left = 0; 
sizerect. right = PS_WIDTH; 

//m_StatusBar. Create (WS_CHILD j WS_VISIble | ccs_BOTTOM, sizerect , this, AFX_IDW STATUS bar ); 
//m_StatuBBar.ShowWindow{SW_SHOWNA) ; " 
//m_StatusBar.SetSimple {) ; 

//in_StatusBar.SetText {"Hello world! " , 25S, 0) ; 
m_StatusBar .Create (this) ; 

/ /m_StatusBar.SetIndicators (auIDStatusBar , sizeof (auIDStatusBar) /sizeof (UINT) > ; 
//m_StatusBar.SetPaneInfo (0, m_StatusBar .GetltemID {0) , SBPS_STRETCH, NtJLL ); 
//ra_StatusBar.GetStatusBarCtrl() . SetText { "Hello world! ",0,0) ; 

CRect rcClientStart; 

CRect rcClientNow; fl fl (1 ''"^ 



pSysMenu- >AppendMenu (MF_SEPARATOR} ; 

pSysMenu->AppendMenu (MF_STRING, IDM_ABOUTBOX, StrAboutMenu); 



} 



// Set the icon for this dialog. The frameworlc does this automatically 
// when the application's main window is not a dialog 
SetIcon(m_hIcon, TRUE) ; // Set big icon 

Setlcon(m_hlcon, FALSE) ; // Set small icon 



GetClientRect (rcClientStart) ; 
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RepositionBars (AFX_IDW_COMTROLBAR_FIRST, AFX_IDW_CONTROLBAR_LAST, 
0, reposQuery, rcClientNow) ; 

// Now move all the controls so they are in the same relative 
// position within the remaining client area as they would be 
// with no control bars. 
/* CPoint ptOff set (rcClientNow. left - rcClientStart . lef t, 
rcClientNow. top - xcClientStart . top) ,- 

CRect rcChild; 

CWnd* pwndChild = GetWindow (GW_CHILD) ; 

while (pwndChild) 

{ 

pwndChild- >GetWindowRect (rcChild) ; 
ScreenToClient (rcChild) ; 
rcChild. Of fsetRect (ptOff set) ; 
pwndChild- >MoveWindow (rcChild, FALSE) ; 
pwndChild = pwndChild- >GetNextWindow () ; 
} */ 

// Adjust the dialog window dimensions 
CRect rcWindow; 
GetWindowRect (rcWindow) ; 

rcWindow. right += rcClientStart . Width ( ) - r cClientNow. Width () ; 
rcWindow. bottom += rcClientStart -Height {) - rcClientNow. Height () ; 
rcWindow. bottom += 5; 
MoveWindow (rcWindow, FALSE); 

// And position the control bars 

RepositionBars (AFX_IDW_CONTROLBAR_FIRST, AFX_IDW_CONTROLBAR_LAST, 0) ; 
m_timerID = 0; 

m_tiTnerID = SetTiraer (TIMERID, 5 0, NULL) ; 
m_Error Counter = 0; 

m_HDCDDisplay = false; 
DisplayMode (1) ; 
SetWindowText( "Untitled") ; 
partsList[0] = rcClientNow .Width () /4 ; 

partsList[l] = partsList [0] + { rcClientNow. Width () /4) ; 
partsListC21 = partsList [1] + (rcClientNow .Width{ ) /4) ; 
partsList [3] = -1; 

m_StatusBar .GetStatusBarCtrlO . SetParts (sizeof (partsList) /sizeof (int) , partsList) 



return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

} 

void CTabDialog: : enclose () 

c 

// if ( m_Pagel ) 

// delete m_Pagel; 

// if( m_Page2 ) 

// delete m_Page2; 

// if( m_Page3 ) 

// delete m_Page3; 

if( m_titnerID ) 

KillTimer( m_timerID ) ; 

delete g_DSPManager; 

CDialog: :OnClose () ; 

} 

void CTabDialog; :OnSysConimand(UINT nID, LPARAM IParam) 
{ 

if ( {nID t OxFFFO) == IDM_ABOUTBOX ) 
{ 

CTabAboutDlg dlgAbout; 
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dlgAbout . DoModal { ) ; 

) 

else 
{ 

CDialog: :OnSysCominand (nID, iParam) ; 

) 

} 

void CTabDialog: :OnPaint () 
{ 

// CPaintDC (ic(this); // device context for painting 

// TODO: Add your message handler code here 

// Do not call CDialog: iOnPaint () for painting messages 

if (IsIconicO) 
{ 

CPaintDC dc(this); // device context for painting 

SendMessage(WM_ICONERASEBKGHD, <WPARAM) dc . GetSaf eHdc ( ) , 0) ,- 

// Center icon in client rectangle 

int cxicon = GetSystemMetrics (SM_CXICON) ; 

int cylcon = GetSystemMetrics <SM_CYICON) ; 

CRect rect ,- 

GetClientRect (&rect) ; 

int X = (rect.WidthO - cxicon + 1) / 2; 
int y = (rect . Height () - cyXcon +1) / 2 ; 

// Draw the icon 

dc .Drawrcon(x, y, ra_hIcon) ; 

} 

else 

{ 

/ /ra_StatusBar . RedrawWindow { ) ; 
CDialog: :OnPaint() ,- 

) 

} 

void CTabDialog: :OnMove (int X, int y) 
{ 

CDialog: lOnMove (x, y) ; 

// TODO: Add your message handler code here 

) 

// The system calls this to obtain the cursor to display while the user drags 

// the minimized window. 

HCURSOR CTabDialog: : OnQueryDraglcon ( ) 

{ 

return (HCURSOR) m_hIcon; 

} 

HBRUSH CTabDialog: :OnCtlColor (CDC* pDC, CWnd* pWnd, UINT nCtlColor) 



HBRUSH hbr = CDialog: :OnCtlColor{pDC, pWnd, nCtlColor) ; 
// TODO: Change any attributes of the DC here 

// TODO: Return a different brush if the default is not desired 

return hbr; 
#if 0 

return m_brush; 
#endif 
} 

void CTabDialog: :OnOpenWenu() 

' 0099 
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// TODO: Add your conmand handler code here 
// char BASED_CODE szFilterCJ = "Text Files ( * . txt ) | * . txt | j " ; 
// CFileDialog fileDlg (TRUE, NULL, HDIiL, OL, szFilter.NULI,) ; 



// CFileDialog f ileDlg (TRUE) ; 

CFileDialog f ileDlg (TRUE, "txt", NULL, OFN_HIDEREADOKLY, "Text Files ( * . txt) { * . txt | All Files (* . *) | * . * | | " , this) 

if( fileDlg.DoModal 0 == IDOK ) 
{ 

int array_size = 0 ; 
CString stringi- 
est ringArr ay array; 

CStdioFile file ( f ileDlg .GetPathKaitie (), CFile :: modeRead | CFile : : typeText ) ,- 

whi le ( f i le . ReadString ( a tring ) ) 

{ 

array . SetAtGrow (array_size, string ); 
array_size++ ; 

} 

g_DSPManager->SetDSPSettings (array) ; 
SetWindowTextCf ileDlg. GetFileNatneO ) ,- 

// MM 5/13/93 Invalidate the window so that window is redrawn 
Invalidate (false) ; 



void CTaiiDialog : :OnSaveMenu ( ) 
{ 

// TODO: Add your command handler code here 

CFileDialog f ileDlg { FALSE ," txt ", NULL, OFN_OVERWRITSPROMPT | OFN_HIDEREAD0NLY, "Text Files (*.txt) | * . txt j | " , this 

if( f ileDlg. DoModalO == IDOK ) 
{ 

int array_index = 0 ; 
CString string; 
CStringArray array; 

g_DSPManager->GetDSPSettings (array) ; 

CStdioFile file ( f ileDlg. GetPathName (), CFile : :modeCreate | CFile : :modeWrite | CFile :: typeText) ; 

while ( array_index < array. Getsize {) ) 

{ 

string = array . GetAt (array_index) ; 
file.WriteString( string) ; 
f ile . WriteString ( "\n" ) ; 
array__index++ ; 

} 

} 



void CTabDialog: : OnFileExportparamf ile ( ) 
{ 

CFileDialog f ileDlg (FALSE, "prm" , NULL, OFN_OVERWRITEPROKPT|OFN_HIDEREADONLY, "Parameter Files C*.prm) |*.prm!|", 
this) ; 

if< fileDlg.DoModal!) == IDOK ) 
{ 

int array_index = 0; 
CString string; 
CStringArray array; 
g_DSPManager->GetFilterBiob (array) ; 

CStdioFile file ( f ileDlg. GetPathName 0, CFile : :raodeCreate | CFile :: modeWrite | CFile :: typeBinary) ; 

while( array index < array . GetSize () ) 

{ 

string = array .GetAt (array_index) ; 
file.WriteString(string) ; 

f ile.WriteString("\n") ; 0x00 
array_index++ ; 
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} 

} 

} 

void CTabDialog: :OnTimer{UIMT nIDEvent) 
{ 

// TODO: Add your message handler code here and/or call default 
if ( nIDEvent == TIMERID ) 
{ 

DisplayMode (g_DSPManager->GetHDCDMode () ) ; 
DisplayI2CState (OL) ; 

} 

else 
{ 

CDialog: :OnTimer (nIDEvent) ; 

■ } 



} 



void CTabDialog :: DisplayMode (int value) 

c 

if( value < o ) 
{ 

DisplayI2CState (-value) ; 

/* char s [lOO] ; 

sprintf (s , "Ox%x" , -value) ; 

m_StafasBar.GetEtatusBarCtrl 0 . SetText ( s, 3 , 0) ; */ 
/* if ( in_tlmerID ) 

KillTimer( m_timerID ); 
CI2CConimErrorDialog dig; 
char s [100] ; 

sprintf (s, "Ox%x" , -value) ; 

dig . m_ErrQrCode = s ; 

if ( dlg.DoModalO == IDCANCEI, ) 

EndDialog (IDCANCEL) ; 
else 

ni_timerXD = SetTimer (TIKERID, 50 , NULL) ; */ 

} 

else if ( value ) 
{ 

if( !m_HDCDDisplay ) 
{ 

m_ICnt = 0 ; 
m_AIdx = 0 ; 

m_StatusBar .GetStatusBarCtrl () . SetText (Detect_Array Cm_AIdx++] ,1,0) ; 
//SetWindowText (Detect_Array [ni_AIdx++] ) ; 

} 

else 
{ 

m_ICnt++; 

if ( m_ICnt > 5 ) 

{ 

m_ICnt = 0 ; 

in_StatusBar .GetStatusBarCtrl 0 .SetText (Detect_Array [m_AIdx++] , 1, 0) 
//SetWindowText(Detect_Array [m_AIdx++] ) ; 
if ( m_AIdx >= AARRAYSIZE ) 
m_AIdx = 0 ; 

1 

} 

m_HDCDDisplay = true; 

} 

else 
{ 

if ( m_HDCDDisplay ) 

m_StatusBar .GetStatusBarCtrl (). SetText ( "BAD CD. .NO DONUT",1,0); 

//SetWindowText { "BAD CD . . NO DONUT") ; 
m_HDCDDisplay = false; 

} 
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void CTabDialog: :SetStatusString(int which, CString &. s) 



m_StatusBai-.GetStatusBarCtrl () . SeCText ( s , 0 , C) ; 

) 

void CTabDialog: :DisplayI2CState (long error) 
{ 

if{ error ) 
{ 

char s [10 0] ; 

sprintf (s, «dx%x" , error) ; 

m_StatusBar.GetStat;usBarCtrl{) .SetText {s, 3 , 0) ; 
ni_ErrorCounter = 100; // 5 seconds 

} 

else 
{ 

if ( ra_ErrorCounter ) 
{ 

ra_ErrorCoimter-- ; 
if ( m_ErrorCounter > 0 ) 
return; 

} if ( g_DSPManager->rsBusY(> ) 
{ 

m_StatusBar.GetStatusBarCtrl 0 . SetText ( "Transmitting . .",3,0> 

) 

else 
{ 

ni_StatusBar.GetStatusBarCtrl 0 . SetText {"", 3 , 0) ; 

] 

} 
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Sif !def ined ( AFX_STWAVERE JPAGE_H OCF7E209_D790_11D2_9SEE_OOS097CDB9E2 INCLUriED_) 

#define AFX_STWAVEREJPAGE_H OCF7E209_D790_11D2_96EE_006097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 10 00 
Spragma once 

#endif // _MSC_VER >= 10 00 

// StWaveRejPage .h : header file 

// 

////// !////!/// ///J //////// J////// J/// ////// ///////// J///////// J //////////J// 
II CStWaveRe j Page dialog 

class CTabDialog; 

class CStWaveRe j Page : Dutolic CPropertyPage 
{ 

DECLARE_D1:NCREATE (CStWaveRe j Page ) 

/ / Cons true t ion 
public : 

CStWaveRejPage C) ; 

-CStWaveRaj Page ( ) ; 

// Dialog Data 

/ / { {AFX_DATA (CStWaveRe j Page ) 
enum { IDD = IDD_PP5 } ; 
CButton m_EypassButton; 
CSliderCtrl ra_Notch3BoostSlider,- 
CSliderCtrl tn_Hotch3QSlider ; 
CSliderCtrl ra_Notch2CutSlider ; 
CSliderCtrl m_Motch2QSlider ; 
CSliderCtrl in_Krotch2FreqSlider ; 
CSliderCtrl ra_NotchlCutSlider ; 
CSliderCtrl rn_NotchlQSlider ; 
CSliderCtrl m_NotchlFreq:Slider ; 
//} )AFX_DATA 



/ / Overrides 

// ClassWizard generate virtual function overrides 

//{ {AFX_VIRTUAL(CStWaveRejPage) 

protected: 

virtual void DoDataExchange (CDataExcliange* pDX) ; // DDX/DDV support 

//}}AFX_VIRTOAL 

// Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG(CStWaveRejPage) 

virtual BOOL OnlnitDialog () ; 

afx_msg void OnVScrolKUINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 

afx_msg void OnShowWindow<BOOL bShow, UINT nStatus) ; 

af x_msg void OnPaint { ) ; 

afx_msg void OnBypassO; 

//} }AFX_MSG 

DECIARE_MESSAGE_MAP ( ) 

CTabDialog *m_Par ent Window; 
void SendStringToUKint which); 

}; 

//{ {afx_insert_location} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ! defined <AFX_STWAVEREJPAGE_H OCF7E2 09_D790_11D2_96EE_006097CDE9E2 INCLUDED_) 
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// bi-HaveKe^Fage.cpp ; implementation file 
// 



#include "stdafx.h" 
#xnclude "sa.h" 
iinclude "StWaveRejPage.h" 
# include "TabDialog.h" 
ftinclude "DSP56kManager .h" 

#ifdef _DEBUG 

#define new DEBUG_NEW 

#undef THIS_FILE 

static char THIS_FILE[] = 

#endif 



FILE 



///////////J// J//// ///////■//////////////////////////////////////////,,// f//f/ 
I j CStWaveRejPage property page 

IMPLEMENT_DYNCREATE (CStWaveRej Page, CPropertyPage) 

CStWaveRejPage: : CStWaveRej Page ( ) : CPropertyPage (CStWaveRej Page : rlDD) 



} 



// { {AFX_DATA_IKIT (CStWaveRej Page) 
//} }AFX_DATA_INIT 



CStWaveRej Page : : -CStWaveRej Page <) 



} 



void CStWaveRejPage: :DoDataExchange (CDataExchange* pDX) 



{ 



CPropertyPage: : DoDataExcliange (pDX) ; 

/ / { { AFX_DATA_MAP ( CS tWaveRe j Page ) 

DDX_Control (pDX, IDC_CHECK5, m_BypassButton) ; 

IDC_SLIDER9, m_Notch3BoostSlider) 
IDC_SL,IDER8 , m_Notch3QSlider) ; 
IDC_SIiIDER6 , m_Notch2CutSlider) ; 
IDC_SLIDER5, in_Notch2QSlider ) ; 
IDC_SLIDER4, iti_Notch2FregSlider) ; 
IDC_SL,IDER3 , m_NotchlCuCSlider) ; 
IDC_SIiIDER2 , m_NotchlQSlider) ; 
IDC_SLiIDERl, m_NotchlFreqSlider) ; 



DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
// } }AFX_DATA_MAP 



BEGIN_MESSAGE_MAP (CStWaveRej Page, CPropertyPage) 
// { {afx_MSG_MAP (CStWaveRej Page) 
ON_WM_VSCROLL ( ) 
ON_WM_SHOWWlNDOW ( ) 
ON_WM_PAINT { ) 

ON_BN_CLICKED ( IDC_CHECK5 , OnBypass) 
//) )AFX_MSG_MAP 
END_HESSAGE_^5AP ( ) 

//''iJf/n/n/ii//j//u//fi/if/if/(i{/ifii/iiif/i III 1,1,1,1 III, 1,1,1 iiij j, 

11 CStWaveRe] Page message handlers 

BOOL CStWaveRejPage: : OnlnitDialog ( ) 

CPropertyPage: : OnlnitDialog () ; 

// TODO: Add extra initialization here 
m_NotchlFreqSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_NotchlFreqslider. SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch3Freq) ) 
m_NotchlFreqSlider.SetTicFreq( (CONTROL_RANGE+l) /16) ; 
ra_NotchlFreqSlider.SetPageSi2e(PG_CONTROL_AMT) ; 

m_NotchlQSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_NotchlQSlider.SetPos{CONTROL_RANGE-g_DSPMana3er-=GetParamValue(kNotch3Q)) ; 
m_NotchlQSlider.SetTicFreq( (C0NTR0L_RANGE+1) /is) ; 
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tn_NotchlQSlider.SetPageSize ( PG_CONTROL_AMT ) ; 
ni_NotchlCutSlider . SetRange ( 0 , CONTROL_RANGE) ; 

ra_NotchlCutSlider . SetPos (CONTROL_EANGE-g_DSPManager-- >Get ParamValue (kNotch3Cut) ) ; 
m_NotchlCutSlider .SetTicFreq( {CONTROL_RANGE+l) /16) ; 
m_NotchlCutSlider . SetPageSize (PG_CONTROI._AMT> ; 

m_Notch2FreqSlider. SetRange (0,CONTROL_RANGE) ; 

m_Notch2FreqSlider .SetPos (CONTROI._RAlTGE-g_DSPManager- >GetParaniValue <kNotch4Freq) ) 
m_Notch2FregSlider.SetTicFreq( (COKTROL_RANGE+l) /16) ; 
ra_Notch2FreqSlider. SetPageSize (PG_CONTROL_AMT) ; 

m_Notch2 QS lider . SetRange ( 0 , CONTROL_RM!GE) ; 

m_Notch2QSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParattiValue (kNotch4Q) ) ; 
m_Notch2QSlider .SetTicFreq( (CONXROL_RANGE+l ) /IS) ; 
ni_Notch2QSlider .SetPageSize (PG_CONTEOL_AMT) ; 

m_Notch2CutSlider. SetRange ( 0 , CONTROL_RANGE) ; 

m_Notch2CutSlider. SetPos (CONTROL_RAKGE-g_DSPMaiiager->GetPararaValue {kNotch4Cut) ) ; 
ra_Notch2CutSlider .SetTicFreq( (CONTROL_RANGE4-l) /16) ; 
TO_Notcli2CutSlider . SetPageSize { PG_CONTROL,_AMT) ; 

m_Notch3 QSlider . SetRange ( 0 , CONTROL_RANGE ) ; 

m_Notch3QSlider .SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kNotchSQ) ) ,- 
m_Notch3QSlider.SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
m_Notch3QSlider. SetPageSize ( PG_CONTROL_MT) ; 

m_Notch3BoostSlider .SetRange {0 , CONTROL_RANGE) ; 

m_Notch3BoostSlider. SetPos {CONTROLi_RANGE-g_DSPManager- >GetParamValue <kNotch5Cut) ) 
m_Notch3BoostSlider.SetTicFreq( (COKTROL_RAHGE+l) /IS) ; 
ni_Notch3BoostSlider. SetPageSize (PG_CONTR0L_AMT) ; 



iii_Pa2rentWindow = (CTabDialog *) GetParent ( ) - >GetParent () ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

} 

void CStWaveRejPage: :SendStringToUI (int which) 
{ 

CString str; 

g_DSPManager->GetStringValue (which^ str) ; 
m_ParentWindow->SetStatusString (0, str) ; 

) 

void CStWaveRejPage: rOnVScrolKUINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *)pScrollBar; 
int which; 

CPropertyPage: :OnVScroll (nSBCode, nPos, pScrollBar) ; 
Sleep (50) ; 

if( slider == &m_NotchlFreqSlider ) 

which = kNotchSFreq; 
else if( slider == &rti_NotchlQSlider ) 

which = kNotch3Q; 
else if ( slider == &ra_NotchlCutSlider ) 

which = kNotch3Cut; 
else if( slider == £:m_Nrotch2FreqSlider ) 

which = kNotch4Freq; 
else if ( slider == £cm_Notch2QSlider ) 

which = )cNotch4Q; 
else if ( slider == im_Notch2 Cuts lider ) 

which = )cNotch4Cut; 
else if ( slider == &m_Kotch3QSlider ) 

which = icNotchSQ; 
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else if { slider == &ni_Notch3BoostSlider ) 

which = kNotchSCut; 
else 

return; 

g_DSPManager->SetParamValue (CONTROL_RANGE-slider->GetPos 0 .which) ; 
Sends tringToUI (which) ; 

} 

void CStWaveRej Page : :OnShowWindow( BOOL bShow, UINT nStatus) 
{ 

CPropertyPage: .•OnShowWindowCbShow, nStatus) ; 
// TODO: Add your message handler code here 

} 

void CStWaveRej Page : : OnPaint ( ) 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

in_KotchlFreqSlider.SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue ()cNotch3Freg) ) 
m_KotchlQSlider .SetPos (C0NTROL_RANGE-g_DSPManager->GetParamValue OcNotchSQ) ) ; 
m_NotchlCutSlider .SetPos (CONTROL_RaNGE-g_DSPManager->GetParamValue (3cNotch3Cut) ) ; 

in_Notch2FireqSlicier . SetPos {CONTROI._RANGE-g_DSPMaiiager->GetParamValue (MSiotch4Freq) ) 
m_Hotch2QSlider. SetPos (CONTROL_RAKGE-g_DSPManager->GetParamValue (kNotch4Q) ) ; 
raJHotchacutSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (]cNotch4Cut) ) ; 

m_Hotch3QSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotchSQ) ) ; 
tn_Notch3BoostSlider .SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue titNotchSCut) ) 

ni_BypassButton . SetCheck (g_DSPManager->GetBypassSection OcBypas sConecry) ) ; 
// Do not call CPropertyPage :: OnPaint { ) for painting messages 

} 

void CStWaveRej Page ; rOnBypass () 
{ 

// TODO: Add your control notification, handler code here 
int state = m_BypassButton. Getstate ( ) & 0x3; 

g_DSPManager- >SetBypassSect ion (state, JcBypassConecry) ; 

} 
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/* 



There a number of blocks {processing units) . 
The signal flow is linear currently. 
Each item is an ascii line of text 
The file format is as follows: 

version number 

block, type 

number of params for block 
block param #1 
block parara #2 
block param #3 

block param #n 

block type 

number of params for block 
block parara #1 
block param #2 
block parara #3 

block parara #n 



*/ 

// file version number 
#define BL0B_FILE_VERSION 1 

// block type descriptor 
typedef enura { 

BLOCK_DELAY, 

BLOCK_GAIN, 

BLOCK_PEQ, 

BLOCK_AP, 

BLOCK_IiS, 

BLOCK_HS, 

BLOCK_HP, 

BLOCK_LP, 

Bl40CK_LP2 
} ProcessType; 
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// SPIPEMicroCoitim.h: interface for the SPIPEMicroComm class. 
// 

///////////// J ////// J ///////////////////////// //////////////////////// 



#if ! defined (AFX_SPIPEMICROCOMM H 33F9EF0g F6EF I1D2 96EE 006097CDB9E2 _INCLUDED_) 

#def ine AFX_SPIPEMICR0C0MM_H 3 3F9EF06_FSEF_11D2_96EE_0 06097CDB9E2 INCLUDED_ 

Sif _MSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 
#include " DS PComiti . h " 

class SPIPEMicroComm : public DSPCoram 



int cnid_de lay ; 
int io_delay; 

public : 

SPIPEMicroComm {) ; 

virtual -SPIPEMicroComm () ; 

virtual long SendDSPWord (long) ; 

virtual long SendDSPMemory (char *,long!; 



#endif // ! defined {AFX_SPIPEMICROCOMM_H 33F9EF06_F6EF_11D2_96EE_0 0S0 97CDB9E2 INCLUDED_) 
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// SPIPEMicroConnra. cpp: implementation of the SPIPEMicroComm class. 
// 

!//////////////////////////////////// f/Jf//////// J///// J////// //////// 

^include "stdafx.h" 

Kinclude "sa.h" 

#include "SPIPEMicroComm. h" 

# inc lude " uni t_pp i . h " 
^include "functs.h" 

#ifdef _DEB0G 
Sundef THIS_FILE 

static char THXS_FILE[]= FILE ; 

#define new DEBUG_NEW 
Sendif 

////////////////////////////////////////////////////////////////////// 
// Construction/Destruction 

////////////////////////////////////////////////////////////////////// 

SPIPEMicroComm: : SPIPEMicroCotnra ( ) 
{ 

cmd_delay = 1000; 
io_delay = 50; 

if( load_dll ()== false ) 
{ 

MessageBox(NULL, •■UNIT_ppr not found in the system directory. Fix this and restart application. "Danaer, I 
anger Will Robinson", MB_OK | MB_ICONSTOP ) ; 

else 
{ 

init_port_spi (1) ; 

set_cmd_delay_cnt_value (cmd_delay) ; 
set_io_delay_cnt_value {io_delay) ; 

} 



SPIPEMicroComm: : -SPIPEMicroComm {) 
{ 



long SPIPEMicroComm: :SendDSPWord[ long value) 
return { spi_xchng2 4 (value) ); 

} 

long SPIPEMicroComm; :SendDSPMemory (char *data, long len) 
return ( OL ) ; 
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#lf ! defined (AFX_SHELVPAGE_H SF151624_D84D_11D2_9SEE_0 060 97CDB9E2 rNCIiUDED_) 

#de£ine AFX_SKELVPAGE_H 6F151624_D84D_11D2_96EE_0 06097CDB9E2 IKCLUDED_ 

#if _MSC_VER >= 1000 
jfpragroa once 

#endif // _MSC_VER >= lOOO 
// ShelvPage.h : header file 
// 

///////////////////////////////////////////////////////////////////////////// 
// CShelvPage dialog 

class CTabDialog; 

class CShelvPage : public CPropertyPage 
{ 

DECLARE_DYNCREATE (CShelvPage) 

/ / Cons truct ion 
public: 

CShelvPage ( ) ; 

-CShelvPage { > ; 

// Dialog Data 

//{ {AFX_DATA (CShelvPage) 
enura { IDD = IDD_PPS ) ,- 
CButton m_BypassSecondButton; 
CButton m_BypassFirstEutton; 
CSliderCtrl ra_HiBoostSlider ; 
CSliderCtrl m_HiFreaSlider ; 
CSliderCtrl m_LoBoostSlider ; 
CSliderCtrl tn_LoFreqSlider ; 
//} }AFX_DATA 



// Overrides 

/ / ClassWizard generate virtual function overrides 

// { {AFX_VIRTUAL (CShelvPage) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
// } } AFX_VIRTUAL 

// Implementation 
protected : 

// Generated message map functions 

/ / { { AFX_MSG ( cshe IvPage ) 

virtual BOOL OnlnitDialog ( ) ; 

afx_rasg void OnVScrolKUINT nSBCode, UIKT nPos, CScrollBar* pScrollBar) ,- 

afx_msg void OnShowWindow ( BOOL bShow, UINT nStatus) ; 

afx_msg void OnPaintO; 

afx_rasg void OnBypassFirst () ; 

afx_msg void OnBypassSecond { ) ; 

//} }AFX_KSG 

DECriAI!.E_MESSAGE_MAP { ) 

CTabDialog *ra_ParentWindow; 
void SendStringToUI {int which); 

); 

// { {afx_insert_locatioh) ) 

/ / Microsoft Developer Studio will insert additional declarations immediately before the previous line 
*endif // i defined (AFX_SHELVPAGE_H SFlSie24_Da4D_llD2_96EE_006097CDB9E2 INCLUDED_) 
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// ShelvPage.cpp : implementation file 
// 

#include "stdafx.h" 

tinclude "sa.h" 

^include "ShelvPage .h." 

S include "TabDialog.h." 

* include "DSPSSkManager . h" 

Sifdef _DEBUG 
iidefine new DEBUG_NEW 
iundef THIS_FILE 

static char THIS_FII,E[] = FILE ; 

Sendif 

///////////////////////////////////////////////////////////////////////////// 
II CShelvPage property page 

IMPLEMENT_DyNCREATE {CShelvPage, CPropertyPage) 

CShelvPage: : CShelvPage 0 : CPropertyPage (CShelvPage :: IDD) 

// { {afx_DATA_INIT( CShelvPage) 
// } }AFX_DATA_INIT 

] 

CShelvPage : : -CShelvPage () 

{ 

} 

void CShelvPage : :DoDataExchange (CDataExchange* pDX} 

CPropertyPage: :DoDataExchange (pDX) ; 
// { { AFX_DATA_MAP (CShelvPage ) 

DDX_Control(pDX, IDC_CHECK3 , m_BypassSecondButton) ; 
DDX_CoiitroL(pDX, IDC_CHECK1, m_BYpassFirstButtoii) ; 
DDX_Coiitrol (pDX, IDC_SLIDER6, tn_HiBoostSlider) ; 
DDX_ControI(pDX, IDC_SLIDER4, m_HiFreqSlider) ; 
DDX_Control (pDX, IDC_SLIDER3, m_I,oBoostSlider) ; 
DDX_Control (pDX, IDC_SLIDER1, m_LoFregSlider) ; 
/ / ) ) AFX_DATA_MAP 

} 



BEGIN_MESSAGE_MAP (CShelvPage, CPropertyPage) 
// { {afx_MSG_map (CShelvPage) 
ON_WM_VSCROLL ( ) 
ON_V?M_SHOWWINDOW { ) 
ON_KM_PAINT ( ) 

ON_BN_CLICKED (IDC_CHECK1, OnBypassFirst) 
ON_BN_CLICKED ( IDC_CHECK3 , OnBypassSecond) 
//})AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

ifn/iii/u/ni/iniifiininiii/i/iiini/imiNin/iniiiinii/niiinimi 

II CShelvPage message handlers 

BOOI, CShelvPage : : OnlnitDialog { ) 

CPropertyPage: : OnlnitDialog { ) ; 

// TODO: Add extra initialization here 
ni_IjoFreqSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_LoFreqSlider.SetPos (CONTROL_RAHGE-g_DSPManager- >GetPararaValue (kLoShelf Freg) ) ; 
m_LoFreqSlider . SetTicFreq { (CONTROL_RAKGE+l) /16) ; 
ni_LoFreqSlider -SetPageSize (PG_CONTROL_AMT) ; 

ra_LoBoost Slider . SetRange { 0 , CONTROL_RAMGE ) ; 

m_LoBoostSlider.SetPos (CONTROLi_RANGE-g_DSPManager- >GetParamValue (IcLoShelf Gain) ) 
m_LoBoostSlider. SetTicFreq ( (CONTROL_RANGE+l) /IS) ; 
m_I,oBoostSlider . SetPageSize (PG_CONTROL_AMT) ; 
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m_HiFreqSlider . SetRange ( o , COilTROL_RANGE) ; 

m_HiFreqSlider.SetPos (CONTROI,_RANGE-g_DSPMana9er- >GetParamValue (kHiShelf Freq) ) ■ 
m_HiFreqSlider.SetTicFreq( (C0MTROr,_RANGH+l) /i6) ; 
iti_HiFreqSlider .SetPageSize {PG_CONTROL_AMT) ; 

m_HiBoost:Slid.er . SetRange ( 0 , CONTROL_RANGE ) ; 

ra_HiBoostSlider.SetPos {CONTROL_RANGE-g_DSPManager->GetParamValue {kHiShelf Gain) ) 
m_HiBoostSlider.SetTicFreq( {CONTROL_RANGE+l) /IS) ; 
ra_Hi Boo stS 1 Ider . Set Pages i 2 e ( PG_CONTROr,_AMT} ; 



m_ParentWindow = {CTabDialog *) GetParent ( ) ->GetParent {) ; 

return TRUE; // return TRUE unless you set the focus to a control 
^ / / EXCEPTION : OCX Property Pages should return FALSE 

void CShelvPage: :OnVScroll{UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *Elider = (CSliderCtrl * ) pScrollBar ; 
int which; 

CPropertyPage: :OnVScroll (nSBCode, nPos, pScrollBar); 
Sleep (50) ; 

if ( slider == &;in_LoFreqSlider ) 

which = kLoShelfFreg; 
else if( slider == &m_LoBoostSlider ) 

which = klioShelf Gain; 
else if ( slider == &rti_HiFreqSlider ) 

which = kHiShelf Freq; 
else if ( slider == S;m_HiBoostSlider ) 

which = )cHiShelfGain; 
else 

return; 

g_DSPManager->SetParamValue (CONTROL_RANGE-slider->GetPos { ) , which) ■ 
SendStringToUI (which) ; 



void CShelvPage: : SendStringToUI (int which) 
CString str; 



g_DSPManager->GetStringValue (which, str) ; 
nL.ParentWindow->SetStatusString ( 0, str) ; 



} 



void CShelvPage: :OnShowWindow {BOOL bShow, UINT nStatus) 
CPropertyPage: :OnShowWindow(bShow, nStatus) ; 
// TODO: Add your message handler code here 

} 

void CShelvPage :: OnPaint { ) 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_LoFreqSlider.SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kLoShelfFreg) ) ■ 
m_LoBoostSlider . SetPos (CONTR0L_RANGS-g_DSPManager->GetParamValue (kLoShelfGain) )' 
m_Hi.FreqSlider.SetPos (CONTROL_RAKGE-g_DSPManager->GetParamValue (kHiShelf Freq) ) • 
m_HlBoostSlider . SetPos (CONTR0L_RANGE-g_DSPManager->GetParamValue (kHiShelfGain) )' . 

m_BypassFirstButton.SetCheck(g_DSPManager->GetBypassSection(kBypassLoshelf)) ; 



2 



in_BypassSecondButton. SetChec)c(g_DSPManager->GetBypassSectioii(kBypassHiShel£) ) 
// Do not call CPropertyPage : :OnPaint { ) for painting messages 



void CShelvPage : :OnBypassFirst ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassFirstB'atton.GetState ( ) & 0x3; 

g_DSPManager- >SetBypassSect ion ( state, kBypassLoshelf) ; 

1 

void CShelvPage :: OnBypassSecond ( ) 
{ 

// TODO:. Add your control notification handler code here 
int state = m_BypassSecondButton. GetState ( ) & 0x3; 

g_DSPManager->SetBypassSection ( state, kBypassHiShelf) ; 

1 
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//Microsoft Developer Studio generated resource script. 

#iiiclude "re source. h" 

((define APSTUDIO_READONLY_SYMBOLS 

f^/n/J/// ////// J///// J //////////// J///////// J/// ///////////////////////////// 

II Generated from the TEXTINCLUDE 2 resource. 
// 

#include "afxres.h" 

II I III III I III II 1 1 II iinii I II I II mil III in III III 1 1 /I Ilium J I III 11 1 nil III 1 1 

#undef APSTUDIO_READONI.Y_SYMBOLS 

iiiiiiiiiiiiiiiiiiiiiiniiiiiimiiiiiiiiininiininiiiiiiiiiiiiiinnniii 

II English (U.S.) resources 

#if ! defined {AFX_RESOURCE_DLL) j| defined (AFX_TARG_EMU) 
#ifdef _WIN32 

lANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US 
#pragraa code_page<1252) 
#endif //_WIN32 

#ifdef APSTUDIO_INVOKED 

iiifiiniifiiiinniniiiiniiiiiiiiiiiiiiniiiiiiiiniiniiiiiiiiiiiiiiiiiii 

II TEXTINCLUDE 
// 

1 TEXTINCLUDE DISCARDABLE 
BEGIN 

"resource .h\0 " 

END 

2 TEXTINCLUDE DISCARDABLE 
BEGIN 

"#include " "afxres .h" "\r\n" 
"\0" 

END 

3 TEXTINCLUDE DISCARDABLE 
BEGIN 

" #def ine _AFX_NO_SPLITTSR_RESOURCES\r\n" 

"Sdefine _AFX_NO_OLE_RESOURCES\r\n" 

" #def ine _AFX_NO_TRACKER_RESOURCES\r\n" 

" #def ine _AFX_N0_PROPERTY_RESOURCES\r\n» 

"\r\n" 

«#if ! defined {AFX_RESOURCE_DLL) |j defined (AFX_TARG_ENU) \r\n" 

"Sifdef _WIN32\r\n" 

"LANGUAGE 9, l\r\n" 

"ttpragma code_page (1252) \r\n" 

"#endif\r\ii" 

"Sinclude " "resWsa . rc2 " « // non-Microsoft Visual C++ edited resources\r\n" 

"#include " "afxres. rc"" // standard comDonents\r\n" 

"#endif\0" 

END 

#endif // APSTUDIO INVOKED 



iil/iiiiiiiiiiiiiiiiiiniiiiniiiiiiiininiiiiiiiiiinniiiiiiiiiiiiiiiiiin 

1 1 Icon 
// 

// Icon with lowest ID value placed first to ensure application icon 
// remains consistent on all systems. 

IDR_MAINFRAME ICON DISCARDABLE "res\\sa . ico" 

/ J n n n I n 1 1 n I II 1 1 II 1 1 1 1 n 1 1 n I n I n I n 1 1 1 1 1 1 1 1 1 1 1 II I n II I II II II n I n I II 1 1 1 

II Dialog 



1 



IDD_MOUTBOX DIALOG DISCARDABLE 0, 0, 259, 55 

STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU 

CAPTION "About KOJ's Amazing Town Crier" 

FONT 8, "MS Sans Serif" 

BEGIN 

ICON IDR_MAINFRAI"1E, IDC_STATIC, 11, 17, 21 , 20 

LTEXT "KOJ's Amazing Town Crier Version 1 . 0 " , IDC_STATIC, 4 0 , 1 0 , 

119, 8 , SS_NOPREFIX 
LTEXT "Copyright (C) PMI 1999 " , IDC_STATIC, 4 0 , 25 , 119 , 8 

DEFPUSHBOTTOH "OK" , IDOK, 220,7,32,14, WS_GROUP 

END 



IDD_SA_DIALOG DIALOGEX 0, 0, 229, 175 

STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE 

EXSTYLE WS_EX_APPWINDOW " 

CAPTION "SuperAudio" 
FONT 8, "MS Sans Serif" 
BEGIN 

"OK 



WS CAPTION 



WS SYSMENU 



DEFPUSHBUTTON 
PUSHBUTTON 
PUSHBUTTON 
PUSHBUTTON 



IDOK, 172, 7, 5 0, 14 
"Cancel " , IDCANCEL, 172 , 23 , 50 , 14 
"Poke Sequence #1 " , IDC_BUTTONl, 35 , 83 , 109 , 25 
"Poke Sequence #2 " , IDC_BUTTON2 , 33, 123 , 115 , 28 



END 



IDD_DIAL0G1 DIALOG DISCARDABLE 0, 0, 236, 229 

STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU 

CAPTION "KOJ's Amazing Town Crier" 

MENU IDR_MENU1 

FONT 8, "MS Sans Serif" 

BEGIN 

END 

IDD_PP1 DIALOG DISCARDABLE 0, 0, 195, 127 

STYLE WS_CHILD | WS_DISABLED | WS_CAPTION 

CAPTION "Test" 

FONT 8, "MS Sans Serif" 

BEGIN 

PUSHBUTTON "Send SPI Sequence #1 " , IDC_BUTTONl , 57 , 36, 8 6 , 22 

PUSHBUTTON "Send SPI Sequence #2 " , IDC_BUTTON2 , 55 , 81, 93 , 3 1 

END 



IDD_PP2 DIALOG DISCARDABLE 0, 
STYLE WS_CHILD | WS_DISABLED | 

CAPTION "Main" 

FONT 8, "MS Sans Serif" 

BEGIN 



0, 288, 146 
WS CAPTION 



CONTROL 

LTEXT 
CONTROL 

CONTROL 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

PUSHBUTTON 
CONTROL 

CONTROL 

LTEXT 
CONTROL 



LTEXT 



END 



"Sliderl" , IDC_SLIDER1, "tnsctls_trackbar32" , TBS_AUTOTICKS | 
TBS_VERT I WS_TABSTOP, SB, 25,22, 8S 
"Pre" , IDC_STATIC, 2 8, 117,12, 8 

"Bypass Processing", IDC_CHECK1, "Button", BS_AUTOCHECKBOX | 
WS_TABSTOP, 173.57,76,10 

"Sliderl" , IDC_SLIDER3 , "msctls_trackl)ar32 " , TBS_AUTOTICKS | 
TBS_VERT I WS_TABST0P,27,25,22,86 
"Post" , IDC_STATIC, 57, 117, 15, 8 
"Volume" , IDC_STATIC, 19 , 15 , 13B , 118 

" Bypas 3 HDCD " , IDC_CHECK2 , " But ton " , BS_AUTOCHECKBOX | 
WS_TABSTOP,173,74,75,10 ~ 

"Bypass HDCD Gain Scale", IDC_CHECK3, "Button", 

BS_AUTOCHECKBOX | WS_TABSTOP, 173 , 91 , 98 , 10 
"Reset All", IDC_BUTT0N1, 173,31,5 0, 14 

"Analog Input ", IDC_CHECK4 , "Button" , BS_AUTOCHECKBOX | 
WS_TABSTOP, 173, 108, 56, 10 

"Sliderl" , IDC_SLIDER7, "msctis_trackbar32 " , TBS_AUTOTICKS | 
TBS_VERT I WS_TABSTOP, 89,25, 22 , 86 
"Analog", IDC_STATIC, 85, 117,23, 8 

"Sliderl", IDC_SLIDER8, "msctis_trackbar32 " ,TBS_AUTOTlCKS | 

TBS_VERT I WS_TABSTOP,119,25,22,S6 
"Delay" , IDC_STATIC, 117 , 117, 19, 8 



0115 
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IDD_PP3 DIALOG DISCARDABLE 0, 0, 195, 127 
STYLE WS_CHILD | WS_DISABLED j WS_CAPTION 
CAPTION "Compression" 
FONT 8, "MS Sans Serif" 
BEGIN 

CONTROL "Bypass Compression" , IDC_CHECK1 , "Button" , BS_AUTOCHECKBOX | 

WS_TABSTOP, 29,24, 104, 10 

END 



IDD_PP4 DIALOG DISCARDABLE 0, 0, 2 44, 15 9 
STYLE WS_CHILD 1 WS_DISABLED | WS_CAPTION 
CAPTION "Resonance Compensation" 
FONT 8, "MS Sans Serif" 
BEGIN 





OXICLCXX , XUlw t>J_iJ.iJQK± , ' utSCuiS X.TB.CiZDcLJ: 6 Z 


, TBS 


Tl T TT'/^T' T V O 

AUiUi iCiVo 




TBS_VERT 1 WS_TABSTOP,4 8,24,21,85 


, TBS 


Tl 1 TOr"/"! T "V 

AUiU i 


CONTROL 


"Sliderl " , IDC_SLIDER3 , "insctls_trackbar32 " 
TBS_VERT i WS_TABSTOP,76,24,20,85 


,TBS_ 




LTEXT 


"Freq. " , IDC_STATIC, 17, 113,20, 11 






LTEXT 


"Q" , IDC_STATIC, 51, 113 , 8 , 11 






LTEXT 


"Cut/Boost " , IDC^STATIC, 71, 113, 33, 11 






GROUPBOX 


"First Notch" , IDC_STATIC , 11 , 15 , 9 8 , 111 






CONTROL 


"Sliderl " , IDC_SLIDER4 , "msctls_trackbar32 " 
TBS_VSRT 1 WS_TABSTOP, 137,24, 24, 85 


,TBS_ 


_AXn'OTICKS 


CONTROL 


"Sliderl", IDC_SLIDERS, "t!isctls_trackiiar32 " 

TBS_VERT 1 WS_TABSTOP, 165,24, 21, 85 


,TBS_ 


_AUTOTICKS 


CONTROL 


"Sliderl" , 1DC_SLIDERS, "msctls_trackbar32 " 
TBS_VERT 1 ■WS_TABSTOP, 193,24,22,85 


,TBS_ 


_AUTOTICKS 


LTEXT 


" Freq . " , IDC_STATIC ,13 5,113,20,11 






LTEXT 


"Q" , IDC_STATIC, 1S9, 113 , 8 , 11 






LTEXT 


"Cut /Boost" , IDC_STATIC,189, 113 , 3 2, 11 






GROUPBOX 


"Second Notch" , IDC_STATIC, 129, 15, 98,111 






CONTROL 


"Bypass", IDC_CHECK5, "Button", BS AUTOCHECKBOX 






WS_TABSTOP, 33 , 135, 39, 10 






CONTROL 


"Bypass", IDC_CKECKS, "Button" , BS_AUTOCHECKBOX 





WS_TABSTOP, 15 3 , 13 S, 3 9, 10 

END 



"rasctls_trac)cbar3 2 " 
I WS_TABSTOP, 20, 24, 20, as 
. IDC SLIDER2 , "msctls trac)cbar32 " 



IDD_PP5 DIALOG DISCARDABLE 0, 0, 339, 162 
STYLE WS_CHILD | WS_DISABLED | WS_CAPTION 
CAPTION "Standing Wave Rejection" 
FONT 8, "MS Sans Serif" 
BEGIN 

CONTROL "Sliderl " , IDC_SLIDER1 

TBS_VERT 
CONTROL "Sliderl 

TBS_VERT I WS_TABSTOP ,48,24,21,85 
CONTROL "Sliderl" , IDC_SLIDER3, "msctls_traclcbar32 " 

TBS_VERT I WS_TABSTOP ,76,24,20,85 
LTEXT "Freq. " , IDC_STATIC, 17 , 113 , 20 , 11 

LTEXT "Q« , IDC_STATIC , 51 , 113 , 8 , 11 

LTEXT "Cut /Boost" , IDC_STATIC, 70, 113, 35, 11 

GROUPBOX "First Notch" , IDC_STATIC, 11, 15 , 98 , 111 

CONTROL "Sliderl" , IDC_SLIDER4, "msctls_trackbar32 " 

TBS_VERT I >rS_TABSTOP,229,24,24,85 
CONTROL "Sliderl" , IDC_SLIDERS , "msctls_trackbar32 " 

TBS_VERT [ WS_TABSTOP,257,24,21,85 
CONTROL "Sliderl", IDC_SLIDER6, "msctls_trac5cbar32 " 

TBS_VERT I ■WS_TABSTOP, 285 , 24, 22 , 85 
LTEXT "Freq. " , IDC_STATIC, 227, 113,20,11 

LTEXT "Q", IDC_STATIC, 261, 113, 8, 11 

LTEXT "Cut /Boost " , IDC_STATIC, 2 60, 113, 34, 11 

GROUPBOX "Second Notch" , IDC_STATIC, 221, 15 , 98 , 111 

CONTROL "Sliderl" , IDC_SLIDER8 , "msctls_trackbar32 " 

TBS_VERT 1 WS_TABSTOP, 140 , 25, 21, 85 
CONTROL "Sliderl", IDC_SLIDER9, "msctls_trackbar32 " 

TBS_VERT j WS_TABST0P,168,2S,22,85 
LTEXT "Q", IDC_STATIC, 144, 114, 8, 11 

LTEXT "Cut/Boost" , IDC_STATIC, 163 , 114 , 34 , 11 

GROUPBOX "Boost Compensation" , IDC_STATIC, 125 , 15, 77 



, TBS_ 
, TBS_ 
, TBS 



AUTOTICKS 
AUTOTICKS 
AUTOTICKS 



TBS 
TBS 
TBS 



AUTOTICKS I 
__AUTOTICKS I 
AUTOTICKS I 



TBS_ 
TBS 



111 



AUTOTICKS 
AUTOTICKS 
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END 



cypass" , iuc_i-Hh,i_i^b, "Button" , BS_AUTOCHECKBOX 
WS__TABSTOP, 146, 137, 41, 10 



IDD_PP6 DIALOG DISCARDABLE 0, 0, 
STYLE WS_CHILD ] WS_DISAB1.ED | WS 
CAPTION "Smiley-Face" 
FONT 8, "MS Sans Serif 
BEGIN 



167, 162 
CAPTION 



END 



CONTROL 


"Sliderl" , 


IDC_SLIDER1, "msctls_trackbar32' 


, TBS_ 


_AUTOTICKS 




TBS_VERT 1 


WS_TABSTOP, 20,24, 20, ( 


!5 






CONTROL 


"Sliderl" , 


IDC_SLIDER3, "insctls_trackbar3 2 ' 


, TBS_ 


_AUTOTICKS 




TBS_VERT i 


WS_TABSTOP, 50 , 24, 20 , ! 


J5 






LTEXT 


"Freq. -1 


, 17 , 113, 20, 11 








LTEXT 


"Cut/Boost 


", -1,43,113,34,11 








GROUPBOX 


"Lo-Shelf " 


,-1,11,15,70,111 








CONTROL 


"Sliderl" , 


IDC_SLIDER4, "msctls trackbar32" 


,TBS_ 


_AUTOTICKS 




TBS_VERT 1 


WS TABSTOP, 108, 24, 24, 


85 






CONTROL 


"Sliderl" , 


IDC_SLIDER6, "msctls trackbar32" 


,TBS_ 


_AUTOTICKS 




TBS_VERT 1 


WS_TABSTOP, 139, 24,22, 


S5 






LTEXT 


"Freq . " , -1 


, lOS, 113, 20, 11 








LTEXT 


"Cut/Boost 


",-1,134,113,33,11 








GROUPBOX 


"Hi -Shelf" 


, -1, 100,15, 69, 111 








CONTROL 


"Bypass" , I 


DC_CHECK1 , "Button" , BS 


AUTOCHECKBOX 






WS_TABSTOP 


, 25, 135, 37, 12 








CONTROL 


"Bypass",! 


DC_CHECK3 , "Button" , BS 


AUTOCHECKBOX 






WS_TABSTOP 


,115,136,37,12 









IDD_PP7 DIALOG DISCARDABLE 0, 
STYLE WS_CHILD | WS_DISABLED | 
CAPTION "Cutoff Response" 
FONT 8, "MS Sans Serif" 
BEGIN 



0, 242, 152 
WS CAPTION 



CONTROL 

CONTROI, 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 



END 



"Sliderl", IDC_SLIDER1, "msctls_trackbar32 " , TBS_AUTOTICKS | 
TBS_VERT I WS_TABSTOP,2 0,24,20,8S 

"Sliderl", IDC_SLIDER2 , "m3Ctls_trackbar32 " , TBS_AUTOTICKS | 
TBS_VERT I WS_TABSTOP, 48, 24, 21, 85 

"Sliderl" , IDC_SLIDER3 , "msctls_trac]cbar32 " , TBS_AUTOTICKS j 

TBS_VERT i WS_TABSTOP, 76, 24 , 20 , 85 

"Freq. " , IDC_STATIC, 17 , 113 , 2 0 , 11 

"Q", XDC_STATIC, 51, 113 , 8 , 11 

"Cut/Boost" , IDC_STATIC, 71, 113 , 33 , 11 

"Low Cutoff " , IDC_STATIC, 11, 15 , 98 , 111 

"Sliderl", IDC_SLIDER4, "msctls_trackbar3 2 " , TBS_AUTOTICKS | 
TBS_VERT I WS_TABSTOP, 137, 24 , 24, 85 

"Sliderl" , IDC_SLIDER5 , "Ttisctls_trackbar3 2 " , TBS_AUTOTICKS j 

TBS_VERT I WS_TABSTOP, 165,24, 21, as 

"Sliderl", IDC_SLIDER6, "rasctls_trackbar32",TBS_AUTOTlCKS I 

TBS_VERT f WS_TABSTOP,193,24,22,85 

"Freq. " , IDC_STATIC, 135 , 113 , 20 , 11 

"Q" , IDC_STATIC, 1S9, 113 , 8, 11 

"Cut/Boost" , IDC_STATIC, IS 9 , 113 , 32 , 11 

"High Cutoff ",IDC_STATrc, 129, 15, 98,111 

"Bypass " , IDC_CHECKS , "Button" , BS_AUTOCHECKBOX | 

WS_TABSTOP,3 9, 139. 41, 12 

"Bypass " , IDC_CHECKS , "Button" , BS_AUT0CHECKBOX | 
WS_TABSTOP, 154, 139,41,12 



0, 285, 164 
WS CAPTION 



IDD_PP8 DIALOG DISCARDABLE 0, 
STYLE WS_CHILD | WS_DISABLED 
CAPTION "Cutoff Response" 
FONT 8, "MS Sans Serif" 
BEGIN 

CONTROL "Sliderl", IDC_SLIDER1, "msctls_trackbar32 " , TBS_AUTOTICKS 

TBS_VERT I WS_TABSTOP,20,24,2 0, 8 5 

"Sliderl" , IDC__SLIDER2 , "msctls_trackbar32 « , TBS_AUTOTICKS 
TBS_VERT i WS_TABSTOP,4 8,24,21,85 
^TEXT "Freq. ",-1,17,113,20,11 

l^TEXT "Q", -1,51, 113, 8, 11 

GROUPBOX "Low Cutoff", -1,11, 15^ 71, 111 



CONTROL 



0111 
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CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 

CONTROL 

CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 



"Sliderl" , IDC_SLrDER4 
TBS_VSRT I WS_TABSTOP 
"Sliderl" , IDC_SLIDER5 
TBS_VERT I WS_TABSTOP 
"Freq. ",-1,110,113,20 
"Q", -1,144, 113, 8, 11 
"High Cutoff -1, 104, 
"Bypass " , IDC_CHECK4 , " 
WS_TABSTOP, 25, 135, 40 
"Bypass " , IDC_CHECK5 , 
WS_TABSTOP, lis, 13 6, 4 0 

"Sliderl" , IDC_SLIDER8 
TBS_VERT I WS_TABSTOP 
"Sliderl" , IDC_SLIDER9 
TBS_VERT I WS_TABSTOP 
"Freq. " , -1, 2 01, 114 , 20 
"Q" , -1, 235, 114, 8, 11 
"New High Cutoff", -1, 
"Bypass " , IDC_CHECK7 , " 
WS_TABSTOP, 207, 137, 40 



. "msctls_trackbar32 " , TBS_AUTOTICKS 
, 112,24, 24, 85 

, "msctls_track±)ar32 " , TBS_AUTOTICKS 
, 140, 24, 21, 85 
. 11 

15, 59, 111 

Button",BS_AtJTOCHECKaOX | 
13 

Button" , BS_AUTOCHECKBOX | 
, 13 

, "msctls_trackbar32 " , TBS_AUTOTXCKS 
, 20\, 25, 24, 85 

, "msctls_trackbar32" , TBS_AUTOTICKS 
, 231, 2S, 21, as 
, 11 

195, IS, 59, 111 
Button" , BS_AUTOCHECKBOX | 
13 



END 



IDD_PP9 DIALOG DISCARDABLE 0, 0, 244, 164 
STYLE WS_CHILD | WS_DISABLED j WS_CAPTION 
CAPTION "Resonance Compensation #2" 
FONT 8, "MS Sans Serif" 
BEGIN 





CONTROL 


"Sliderl", IDC_SLIDER1, "msctls_tracki>ar32 " 


,TBS_ 


_AUTOTICKS 






TBS_VERT 1 WS_TABSTOP, 20 , 24 , 20, 85 








CONTROL 


"Sliderl", IDC_SLIDER2, "rasctl 3_trac]cbar32 " 


,TBS_ 


_AUTOTICKS 






TBS_VERT 1 WS_TABSTOP,48,24,21,85 








CONTROL 


"Sliderl " , IDC_SLIDER3 , "msctls_trackbar32 " 


, TBS_ 


_AUTOTICKS 






TBS_VERT [ WS_TABSTOP,7 6,24,20,85 








LTEXT 


"Preg. «, 1DC_STAT1C, 17, 113 , 20, 11 








LTEXT 


"Q",1DC_STATIC,51, 113 , 8, 11 








LTEXT 


"Cut/Boost" , IDC_STATIC, 71, 113, 3 3 , 11 








GROUPBOX 


"Third Notch" , IDC_STATIC, 11, 15, 98,111 








CONTROL 


" S liderl " , IDC_SLIDER4 , "ms c 1 1 s_trackbar 3 2 " 


,TBS_ 


_AUTOTICKS 






TBS_VERT 1 WS_TABSTOP, 137, 24 , 24 , 85 








CONTROL 


"Sliderl", IDC_SLIDER5, "rtisctls_trackbar32 " 


,TBS_ 


_AUTOTICKS 






TBS_VERT 1 WS_TABSTOP,ie5,24,21,85 








CONTROL 


"Sliderl", IDC_SLIDER6, "rasctls_trackbar3 2 " 


, TBS_ 


_AUTOTICICS 






TBS_VERT 1 WS_TABSTOP,193,24,22,85 








LTEXT 


"Freq. « , IDC_STATIC, 135, 113,20, 11 








LTEXT 


"Q" , IDC_STATIC, 1S9 , 113 , 8 , 11 








LTEXT 


"Cut/Boost", IDC_STATIC, 189 , 113 , 32 , 11 








GROUPBOX 


"Fourth Notch", IDC_STATIC, 12 9, 15, 98, 111 








CONTROL 


"Bypass " , IDC_CHBCKS , "Button" , BS AUTOCHECKBOX 








WS_TABSTOP, 36, 139,40, 12 








CONTROL 


"Bypass " , IDC_CHECK6 , "Button" , BS_AUTOCHECKBOX 





WS_TABSTOP, 155, 139,40, 12 
END 



IDD_DIAIjOG2 dialog discardable 0, 0, 175, 66 

STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU 

CAPTION "Dialog" 

FONT 8, "MS Sans Serif" 

BEGIN 

PUSHBUTTON "Cancel " , IDCANCEL, 59,34,50,14 

LTEXT "Initializing I2C. Please Wait " , IDC_STATIC, 43 , 17, 

98 , 8 

END 



IDD_DIALOG3 DIAiOG DISCARDABLE 0, 0, 18 6, 13 2 

STYLE DS_MODALFRAME | WS_POPUP j WS_CAPTI0K | WS_SYSMENU 

CAPTION "Dialog" 

FONT 8, "MS Sans Serif" 

BEGIN 

DEFPUSHBUTTON "OK", IDOK, 107, 95, 50, 14 

CONTROL "COMl" , IDC_RADI01, "Button" , BS_AUTORADIOBUTTON, 2 3,57,35, 

10 

CONTROL "COM2 " , IDC_RADI02 , "But ton" , BS_AUTORADIOBUTTON, 2 3 , 7 0 , 3 6 , 
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CONTROL, 
CONTROL 
LTEXT 
GROUPBOX 



10 

"COM3 " , IDC_RADI03 , "ButCon" , BS_AOTORADIOBUTTON, 23,82,36, 
10 

"COM4" , IDC_RADr04 , "Button" , BS_AUTORADIOBUTTON, 23, 95, 3S, 
10 

"Choose COM port and reset DSP board" , IDC_STATIC, 28 , 21, 
125, 8 

"COM Port", IDC STATIC, 15, 45, 68, 69 



END 



IDD_DIALOG4 DIALOG DISCARDABLE 0, 0, 18S, 121 

STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMEKU 

CAPTION "Dialog" 

FONT 8, "MS Sans Serif" 

BEGIN 

DEFPUSHBUTTON "OK" , IDOK, 2 7, 72, 5 0, 14 

PUSHBUTTON " Qui t App" , IDC_BUTTONl , 101 , 72 , 4 8 , 14 

LTEXT "I2C conmunication error ! " , IDC_STATIC, 4 9, 25 , 79 , 8 

EDITTEXT IDC_EDITl,4 9,4 2,6 3,12,ES_AirrOHSCROLL 

END 



1DD_PP10 DIALOG DISCARDABLE 0, 0, 187, 162 

STYLE WS_CHILD | WS_DISABLED | WS_CAPTION 

CAPTION "Allpass" 

FONT 8, "MS Sans Serif" 

BEGIN 

"Sliderl",IDC_SLIDERl, »msctls_trackbar32",TBS_AUTOTICKS 
TBS_VERT I WS_TABSTOP,2 0,24,20,85 

"Sliderl", IDC_SLIDER3 , "msctls_trackbar32 " , TBS_AUTOTICKS 
TBS_VERT I WS_TABSTOP,50, 24, 20, 85 
"Freq. " , -1, 17, 113 , 20 , 11 
"Q", -1,53, 113, 8, 8 
"Allpass", -1, 11, 15, 7 0, 111 

"Bypass" , IDC_CHECK1, "Button" , BS_AUTOCHECKBOX | 
WS_TABSTOP, 25, 136, 3 7, 12 

END 



CONTROL 

CONTROL 

LTEXT 
liTEXT 
GROUPBOX 
CONTROL 



IDD_PP11 DIALOG 
STYLE WS_CHILD 
CAPTION " Double 
FONT S, "MS Sans 
BEGIN 

CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 



CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 



END 



DISCARDABLE 0, 0, 244, 159 

WS_DISABLED j WS_CAPTION 
Tuned Notch" 
Serif" 

"Sliderl " , IDC_SLIDER1 , "msctls_trackbar32 " , TBS 

TBS_VERT I WS_TABSTOP, 2 0, 24 , 2 0, 85 
"Sliderl", IDC_SLrDER2, "msctls_trackbar32 " , TBS 
TBS_VERT I WS_TABSTOP,48,24,21, 85 
"Freq. ", -1,17, 113, 2 0, 11 
"Q", -1, 51, 113, 8, 11 
"Notch" , -1, 11, 15 , 70 , 111 

"Sliderl" , IDC_SLIDER5, «rasctls_trackbar32 " ,TBS 
TBS_VERT I WS_TABSTOP,109,24,21,8S 
" S 1 ider 1 " , IDC_SLr DERS , " ras ct 1 s_trac]cbar 3 2 " , TBS 
TBS_VERT I WS_TABSTOP, 137 , 24 , 22 , 85 
"Q", -1,113, 113, 8, 11 
"Cut/Boost", -1, 133, 113, 32, 11 
"Compensation" , -1, 99, 15, 71, 111 

"Bypass" , IDC_CHECK5, "Button" , BS_AUTOCHECKBOX 
WS_TABSTOP, 73, 13 5, 3 9, 10 



_AUTOTICKS 
_AUTOTICKS 

_AUTOTICKS 
AUTOTICKS 



#ifndef _MAC 

/iif/ii/j!//u/iiijii/n/innim//i/jf/in/imi/iii/ji/iiiiiinini/iiiiii 

II Version 
// 

VS_VERSION_lNFO VERSIONINFO 

FILEVERSION 0,7,4,0 

PRODUCTVERSION 0,7,4,0 

FILEFLAGSMASK 0x3 fL 
#ifdef DEBUG 
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1. J-J-iL-it. JJrt^JO 

#else 



FILEFLAGS OxOL 

Sendif 

FILEOS 0x4L 
FILETYPE OxlL 
FILESUBTYPE OxOL 
BEGIN 

BLOCK "StringFilelnfo" 
BEGIN 

BLOCK "04 0904bO" 

BEGIN 

VALUE "CompanyName", "Pacific Microsonics lac.\0" 
VALUE "FileDescription", "sa MFC Application\ 0 " 
VALUE "FileVersion" , "0, 7, 4, 0\0" 

VALUE "InternalNarae", "saVO" 

VALUE "LegalCopyright", "Copyright (C) PMI 1999\0" 
VALUE "OriginalFilename" , "sa.EXE\0" 
VALUE "ProdiictName", "sa Application\0" 
VALUE "ProductVersion" , "0, 7, 4, 0\0" 

END 

END 

BLOCK "VarFilelnfo" 
BEGIfJ 

VALUE "Translation", 0x409, 1200 

END 

END 

#endif // !_MAC 



ii^r 1 1 1 II 1 1 1 1 1 1 1 1 1 n I / u / 1 1/ 1 1 / / 1 1 / 1 1 / m 1 1 f / 1 / / / f / / J f / 1 1 / J / ij I / / 11 / li f / 1 f / J I f 

/I DESIGNINFO 



#ifdef APSTUDIO_INVOKED 
GUIDELINES DESIGNINFO DISCAJiDABLE 
BEGIN 

IDD_ABOUTBOX, DIALOG 
BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 2 52 
TOPMARGIN, 7 
BOTTOMMARGIN , 4 8 

END 

IDD_SA_DIALOG, DIALOG 
BEGIN 

LEFTMARGIN, 7 

R IGHTMARG IN , 22 2 

TOPMARGIN, 7 

BOTTOMMARGIN, 168 

END 

IDD_DIAL0G1, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 229 

TOPMARGIN, 7 

BOTTOMMARGIN, 222 

END 

IDD_PP1, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 188 

TOPMARGIN, 7 

BOTTOMMARGIN, 120 

END 

IDD_PP2, DIALOG 
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BEGIH 

LEFTMARGIN, 7 
RIGHTMARGIN, 281 
TOPMARGIN, 7 
BOTTOMMARGIN , 13 9 

END 

IDD_PP3, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 188 

TOPMARGIN, 7 

BOTTOMMARGIN , 12 0 

END 

IDD_PP4, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 237 

TOPMARGIN, 7 

BOTTOMMARGIN , 15 2 

END 

IDD_PPS, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 332 

TOPMARGIN, 7 

BOTTOMMARGIN, IS 5 

END 

IDD_PP6, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 180 

TOPMARGIN, 7 

BOTTOMMARGIN, 155 

END 

IDD_PP7, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 235 

TOPMARGIN, 7 

BOTTOMMARGIN, 15 5 

END 

IDD_PP8, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 2 78 

TOPMARGIN, 7 

BOTTOMMARGIN, 157 

END 

IDD_PP9, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 237 

TOPMARGIN, 7 

BOTTOMMARGIN, 15 7 

END 

IDD_DIA10G2 , DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 168 

TOPMARGIN, 7 

BOTTOMMARG IN , 59 

END 

IDD DIALOGS, DIALOG 
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BEGIN 

LEFTKARGIN, 7 
RIGHTMARGIN, 179 
TOPMARGIN, 7 
BOTTOMMARGIN, 125 

END 

IDD_DIAL0G4, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 179 
TOPMARGIN, 7 
BOTTOMMARGIN, 114 

END 

IDD_PP10, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 180 
TOPMARGIK, 7 
BOTTOMMARGIN, 155 

END 

IDD_PP11, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 237 
TOPMARGIN, 7 
BOTTOMMARGIN , IS 2 

END 

END 

#endif // APSTUDIO_INVOKED 



y^////// /////////////////////////////////////////////////////////// ////////// 

II Menu 
// 

IDR_MENU1 MENU DISCARDABLE 
BEGIN 

POPUP "File" 
BEGIN 

MENUITEM "Open", 
MENUITEM "Save", 
MENUITEM "Export Param File", 

END 

END 



ID_MENUITEM3 2 771 
ID_MENUITEM32 772 
ID_FILE EXPORTPARAMFILE 



II III ll/l III III till I II INI II I III III! Ill II I III If /1 1,1 1 /I, /I [I /If I 1,1, ff,,, 

II string Table 
// 



STRINGTABLE DISCARDABLE 
BEGIN 

IDS_AEOUTBOX 

END 



"tAbout KOJ's Amazing Town Crier. 



#enciif // English (U.S.) resources 

lll/lllllllllllllllllllllllll/lllllllllllllllllll I III ff fill f fill /III 11/11 fill 



Sifndef APSTUDIO_INV0KED 

IIIIIIIIIIIIIIIUIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII/II/////I//II/II/II 

II Generated from the TEXTINCLUDE 3 resource 
// 

#define _AFX_NO_SPLITTER_RESOURCES 

#def ine _AFX_NO_OLE_RESOURCES 0 1. 2 2 
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Sdefine _AFX_NO_TRACKER_resources 
Sdefine _AFX_NO_PROPERTY_RESOURCES 

#if ! defined (AFX_RESOURCE_DI.L) || defined (AFX_TARG_ENU) 

#ifdef _WIN32 

LANGUAGE 9, 1 

Spragma codejpage { 125 2 ) 

Sendif 

#include "res\sa.rc2" // non-Microsoft Visual C++ edited resources 

#include "afxres.rc" // Standard components 

#endif 

///////////////////////////////////////////////////////////////////////////// 
ffendif // not APSTUDIO_INVOKSD 



m 
y 

Si 

m 
m 

o 

m' 

o 
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opt 



cc, cex, ere , loc , so , mu, mex. 



DEFINE 
DEFINE 



FAST • 1 ' 

K563S2 



TABLE_COUNTER EQU 10 
IlUN_COUNTER EQU 10 

3NIT_COUNTER EQU 10 

org y(10) :$100 
org p{10) :$980 



SECTION 



SUPER 



HDCD detect and expand code 



include ' detect . asm' 
include ' expgain. asm' 



q' 

m 

m 

m 
m 

a 
m 

o 



Adopted from Motorola sample code. 



CONFIGURE SPI 



page 

include 

include 

include 

include 

include 

include 

include 

include 

list 

MACRO 



132, 60 
■ ioequ. asm' 
'vectors . asm' 
■ rabiquad . asm ' 
'mpeq.asm' 
'mshelv.asm' 
'mhipass . asm' 
'mlopass . asm' 
' allpass . asm' 



move 
move 



#0,xO 

xO,X: M HSAR 



; clear I2C address 



M_HCKR 

bits 13:12 HFM1:0 noise filter setting (off) 
bit I CPOIi 
bit 0 CPHA 

00 xxxx xxxx xxOl 
move #l,xO 
move #0,xO 
move xO , X : M_HCKR 

commented out code should yeild a value of 0 for M_HCKR. 
M_HCSR 

bit 13:12 HCSR HRIE 

bit 11 HCSR HTIE 

bit 10 HCSR HBIE 

bit 9 HCSR Idle (no care) 

bit 8:7 HRQE Host -request enable (asserted if ready to receive) 

bit 6 HMST Master mode (disabled) 

bit S HFIFO FIFO control (disabled) 

bit 4 HCKFR Clock freeze (off) 

bit 3:2 HM1:0 24 bit mode 

bit 1 HI2C Enables I2C mode 

bit 0 HEN Enable port 
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; XXOl 0010 OOOx 1001 
move #$1209, xO 
move xO , X : M_HCSR 

; set command to known value 
move #SPITXDEF,xO 
move xO,x:spixmit 
movep X : sp ixmi t , x : M_HTX 

ENDM 



CONFIGITRE I2C 



MACRO 



; turn off port 

move #0,xO 

move xO,X:M HCSR 



; leave address alone 

move jiO,xO 

move xO,X:M HSAR 



; clear I2C address 



commented out code should yeild a value of 0 for M_HCKR . 
M_HCKR 

bits 13:12 HFM1:0 noise filter setting on 

11 xxxx xxxx xxOO 
move #>$3000,x0 
move xO,X:M HCKR 



M_HCSR 

bit 13:12 HCSR HRIE 
bit 11 HCSR HTIE 
bit 10 HCSR HBIE 
bit 9 HCSR Idle (no care) 
bit 8:7 HRQE Host-request enable 
bit 6 HMST Master mode (disabled) 
bit 5 HFIFO FIFO control (disabled) 
bit 4 HCKFR Clock freeze (off) 
bit 3:2 HMl : 0 24 bit mode 
bit 1 HI2C Enables I2C mode 
bit 0 HEN Enable port 

xxOl 1100 lOlx 1010 
move #$lCAA,x0 
move x0,X:M HCSR 



asserted if ready to receive) 



; set command to known value 

move #0,xO 

move XO , X : spixmit 

movep X : spixmi t , x : M_HTX 

ENDM 



XDEF 
XREF 
XREP 
XREF 
XREF 
XREF 
XREF 



fcontrol 

HDCD_DETECT_INIT, HDCD_DETECT, Isbcntl 

Itemp, rtemp 

dcontrol 

HDCD_GAIN_INIT, HDCD_DYNAMICS 

detect 

rmodel , b i tent 1 



SPITXDEF 



equ 



$444444 



org XI ; 

DRX_BUFF_BASE ds 2 
ARX BUFF BASE ds 2 



TX_BUFF_BASE 

; RX_PTR 
TX PTR 



ds 

ds 



ds 



xinprocessed followed by processed data 



0125 



2 



flags ds 1 

Bcnt ds 1 

RightReceive equ 0 

SPIReceive equ 1 

SPIOverinn equ 2 

SPIFIFOFull equ 3 

SPIUndenrun equ 4 

SPITransmit equ 5 

SPIStateBit equ 6 



spixinxt 


CIS 


1 


spirecv 


ds 


1 


shisaveAl 


ds 


1 


shisaveXO 


ds 


1 


shisaveR4 


ds 


1 


shisaveN4 


ds 


1 


NADA 


ds 


1 


left 


ds 


1 


right 


ds 


1 


f control 


ds 


1 


indexData 


ds 


1 


dplef t 


ds 


1 


dpright 


ds 


1 


stack 


ds 


20 



; 2 . 9 mS delay line 
; left 
; right 



org yi : 



YNADA 


ds 


1 


volume 


ds 


1 


pref ader 


ds 


1 


bypass 


ds 


1 


hdcdbp 


ds 


1 


gainscalebp 


ds 


1 


ddxcompbp 


ds 


1 


analogin 


ds 


1 


avolume 


ds 


1 


bypassmask 


ds 


1 



; interleaved delay line 
,- independently located 

org x(20) :$200 
DELAYLEN EQU 128 
sdelaylef t dsm DELAYLEN 

sdelayright dsm DELiAYLEN 





BYPASE_ 


_N0TCH1 


EQD 


0 




bypass] 


_NOTCH2 


EQU 


1 




BYPASS, 


_N0TCH3 


EQU 


2 




BYPASS_ 


_N0TCH4 


EQU 


3 




bypass] 


_HIPASS 


EQU 


4 




BYPASS_ 


_LOPASS 


EQU 


5 




bypass] 


]]r,OSHELV 


EQU 


6 




BYPASS_ 


_HISHELV 


EQU 


7 




BYPASS_ 


_CONECRY 


EQU 


a 




bypass] 


_ALLPASS 


EQU 


9 




BYPASS_ 


_DBNOTCH 


EQU 


10 




BYPASS_ 


_NLOPASS 


EQU 


11 



delayval ds 1 



; EQ/filtex declarations 

. ********************************************* 

; smiley face shelf EQ 
; left channel 
DECLARE_LSH lL,l.,-0.8 67 
DECLARE_HSH 2L,l.,-0.8 67 

; right channel 
DECIARE_LSH lR,l.,-0.8 67 
DECLARE_HSH 2R, I., -0.8 67 

; resonance compensation PEQ ri -t «"> 
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; left channel 
DECriARE_PEQ IL, 1 . 
DECI»ARE_PEQ 2L, 1 . 



-0.9S10S65, 0 . 72654 25 
-0.91, o.S 



DECLARE_PEQ 6L , 1 . 
DECLARE_PEQ 7L, 1 . 

; right channel 

DECIARE_PEQ IR, 1 . 
DECLARE PEQ 2R, 1. 



-0.9510565, 0. 72 654 25 
-0.91, O.S 



-0.91, 0.5 
-0.91, 0.5 



DECLARE_PEQ SR, 1. 
DECLARE PEQ 7R, 1. 



-0.9510565, 0.72SS4 2 5 
-0.91, 0.5 



standing wave rejection PEQ 
; left channel 

DEC3jARE_PEQ 31,, 1 . , -0 . 9999303 , 0 . 9937365 
DECLARE_PEQ 4L, 1 . , - 0 . 91 , 0 . 5 
DECLARE_PEQ 5L, 1 . , - 0 . 91 , 0 . 5 

; right channe 1 

DECIARE_PEQ 3R, 1 . , -0 . 9999803 , 0 . 9937365 
DEC1ARE_PEQ 4R, 1 . , - 0 . 91 , 0 . S 
DECLARE_PEQ 5R, 1 . , -0 . 91 , 0 . 5 

hi and lo pass filters 
; left 

DEC1ARE_HP hplef t, 0 . 009973 3, 0.25, 0,998 72 85 
DECIARE_LP Ipleft, 1.192 1856,0. S3 03 8 86, 1.4 112 8 71 

; r ight 

DECIARE_HP hpright, 0.009S733 ,0.25,0. 99872 85 
DECLARE_LP Ipright , 1 . 1921856 , 0 . 63 03 886 , 1 . 4112 871 

; new lopass 
; left 

DECLARE_LP Iplef t2 , 1 . , 0 . , 0 . 
; r ight 

DECLARE^LP lpright2 , 1 . , 0 . , 0 . 

allpass filters 

DECIARE_AP apleft, -0.91, 0.5 
DECLARE_AP apright , -0 . 91 , 0 . 5 



70 Hz 

14000 Hz / q = 0.22 



70 Hz 
14000 Hz 



; Keith new notch with 2 gain around it. 

DECtARE_PEQ KTIL, 1. , -0 . 9999803 , 0 . 99373 65 
DECIARE_PEQ NT2L, 1. , -0 . 91, 0 . 5 
DECIiARE_PEQ NT3L, 1 . , -0 . 91 , 0. 5 

DECIARE_PEQ NTIR, 1. , -0. 9999803 , 0 . 9937365 
DECl4ARE_PEQ NT2R, 1. , - 0 . 91, 0 , 5 
DECLARE_PEQ NT3R , 1 . , - 0 . 91 , 0 . 5 



START 

main 



org p:$10 0 



ori #$03, mr 

movep #$0S000B,X:M_PCTL 

move #0,omr 

movec #0 , sp 

movep #$000003, x:M_IPRP 

movep )f $000007, x:M_IPRP 

move #stack,re 

move # - 1 , itiG 

move #0,xO 

move X 0 , X : DRX_BUFF_B ASE 

move xO , X : DRX_BUFF_BASE+ 1 

move xO , X ! ARX BUFF BASE 



mask interrupts 



reset hardware stack pointer 
ESAI int • s enabled and top Priority 
SHI (1) and ESAI (2) int • s enabled 
initialize stack pointer 
linear addressing 
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TOOve xO,x;ARX_BUFF_BASE + l 

move xO , X ; TX_BUFF_BASE 

move xO , X : TX_BUFF_BASE+ 1 

move xO , X : TX_BUFF_BASE+ 2 

move XO , X : TX_BUFF_BASE+3 

clr a 

move a, x: flags 

move a,x:scnt 



; HDCD decoder initialize 

move # > 1 , xO 

move xO,x: f control 

move #>16,x0 

move xO,x:lsbcntl 

jsr HDCD_DETECT_INIT 

move # > 1 , xO 

move xO,x: dcontrol 

j sr HDCD_GAIN_INIT 



move # - 1 , mO 

move # - 1 , ml 

move # - 1 , m2 

move # - 1 , m3 

move #-l,m4 

move # - 1 , mS 

move #-l,m6 

move # - 1 , m7 



; set up volume and bypass switches 

; output volume is set to zero so that filter parameters can 
; be downloaded, followed by volume being set 

move #>$aOOOOO,xO 

move xO , y : volume 

move xO , y :pref ader 

move xO , y : avolume 

move #>$7FFFFF,xO 

move xO,y: bypass 

move #>$0,xO 

move xO , y : hdcdbp 

move xO , y :gainscalebp 

move xO , y : ddxcompbp 

move xO , y : analogin 

move xO , y :bypassmask 

move xO , y : delayval 

move xO , X : indexData 



move #>sdelayleft, xO 

move xO,x:dpleft 

move #>sdelayriglit,xO 

move xO , X : dpright 

; initialize EQ params 



INIT_ 


_PEQ_ 


PARAM 


Ih 


IN1T_ 


_PEQ_ 


_PARAM 


IR 


INIT_ 


]PEQ~ 


_PARAM 


2L 


INIT_ 


_PEQ_ 


_PARAM 


2R 


INIT_ 


_PEQ_ 


PARAM 


3L 


INIT PEQ_ 


_PAIIAM 


3R 


INIT_ 


_PEQ_ 


PARAM 


4L 


INIT_ 


PEQ_ 


_PARAM 


4R 


INIT_ 


>eq" 


_PARAM 


5L 


INIT_ 


_PEQ_ 


[PARAM 


5R 


INIT_ 


_PEQ_ 


_PARAM 


6L 


INIT_ 


_PEQ_ 


_PARAM 


6R 


INIT_ 


_PEQ_ 


_ PARAM 


7L 


INIT_ 


_PEQ_ 


_PARAM 


7R 



INIT_PEQ_PARAM NTIL 

IKIT_PEQ_PARAM NT2L (1 1 1^ 

INIT_PEQ PARAM NT3L U i A« U 
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INIT_PEQ_PARAM NT2R 
INIT_PEQ_PARAM NT3R 

INIT_SH__PARAM IL 

INIT_SH_PARAW IR 

INIT_SH_P?lRAM 2L 

INIT_SH_PARAW 2R 

INIT_LP_PARAM Ipleft 
INIT_LP_PARAM Ipright 

INIT_LP2_PARAM IpleftZ 
INIT_LP2_PARAM lpright2 

INIT_AP_PARAM apleft 
rNIT_AP_PARAM aprighc 

; hi-pass does not need initializing as all params are downloaded 



; setup serial host interface 
; ,- CONFrGURE_SPI 
CONFIGURE I2C 



FST/FSR and SCKT/SCKR are generated from the PLD 
and fed to the DSP, A/D and D/A converters 



;put esai in reset state. 

; IF ®DEF{ 'ANAIiOGIN' ) ==0 

movep #$000000, x:M_PCRC ; MLS 12/20/97 

movep #$000000, x::M_PRRC ; MLS 12/20/97 

; ENDIF 



movep #$0c0200, x:M_TCCR 
;FST is input 

; external clock source drives SCKT 
(•negative FST polarity 
;data t FST clocked out on rising edge 
; 2 words per frame 



(bit22=0) 
{bit21=0) 
(bitl9=l) 
(bitl8=l) 
(bitl3 : 9=00001) 



movep lf$0c0200,x:M_RCCR 
;FSR is input 

; external clock source drives SCKR 
; negative FSR polarity 
;data & FSR clocked in on rising edge 
;2 words per frame 



(bit22=0) 
(bit21=0) 
(bitl9=l) 
(bitie=0) BAK(121997) 
(bitl3 : 9=00001) 



movep #$000000, x:K SAICR 



JL ^ ^ 
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movep #$dl7D03,x:M_R.CR 
RXl, RXO enabled 
RX2, RX3 disableci 

reserved 

MSB shifted first 
word left -aligned 
network mode 

32-bit slot length, 24-bit word length 
word- length frame sync 

frame sync occurs 1 clock cycle earlier 
reserved 

RLIE, RIE, REIE enabled 
bit23 RLIE 
bit22 RIE 
bit21 REDIE 
bit20 REIE 



(bitl:0=ll) 

(bit3 :2=00) 

(bit5:4=00) 

(bit6=0) 

(bit7=0) 

{bit9:8=01) 

{bitl4 :10=11111) 

(bitl5=0) 

(bitl6=l) 

(bitl9:17=000] 

(bit23 :20=0101) 



movep #$dl3dO0,X:M_TCR 
TXO, TXl enabled 
TX2, TX3, TX4, TXS disabled 
MSB shifted first 
word left-aligned 
network mode 

32-bit slot length, 24-bit word length 
word length frame sync 

frame sync occurs 1 clock cycle earlier 
reserved 

TLIE, TIE, TEIE enabled 
bit23 TLIE. 
bit22 TIE 
bit21. TEDIE 
bit20 TEIE 



;MLS 12/20/97 

(bit3:0=0011) 

(bit5:4=00) 

{bit6=0) 

(bit7=0) 

(bit9:8=01) 

{bitl4: 10=11111) 

(bitl5=0) 

(bitl6=0) 

(bitl9: 17=000) 

(bit23 : 20=0101) 





movep 


#$000edb,x 


Ik- 

M_PCRC 


; MLS 


12/20/97 






movep 


#$000edb,x 


M_PR!?C 


; MLS 


12/20/97 






movep 


#$ffffff ,x 


M_RSMA 


;MLS 


12/20/97 






movep 


#$ffffff ,x 


M_RSMB 


,-MLS 


12/20/97 






movep 


#$000003, X 


M_TSMA 










movep 


#$000003, X 


M_TSMB 










movep 


#$000000 , X 


M_TXO 


; zero 


out transmitter 


0 




movep 


#$000000, X 


M_TX1 


; zero 


out transmitter 


1 




movep 


#$000000, X 


M_TX2 


; zero 


out transmitter 


2 




movep 


#$000000 , X 


M_TX3 


; zero 


out transmitter 


3 




bset 


#0,X:M_TCR 




; now 


enable TXO 






bset 


#l,x;M_TCR 




;now 


enable TXl 






bset 


#2,X:M_TCR 




;now 


enable TX2 






bset 


#3,X:M_TCR 




;now 


enable TX3 






bset 


#2,X!M_RCR 




;RE2 


and TE3 must be set 



to enable 



;TX3 and disable RX2 



; turn on serial host interface 
bset #0,X:M HCSR 



andi 



#$FC,mr 



; enable all interrupt levels 
; clear scaling bits 



bclr #RightReoeive,X: flags 



jclr #RightReceive,X: flags, * 

bclr #RightReceive,X: flags 

jclr #RightReceive,X: flags, * 

move #>RX_BUFF_BASE , xO 

move xO , x : RX_PTR 

move #>TX_BUFF_BASE, xO 

move xO , x : TX_PTR 



Main loop 



LOOP 



3^ 
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jclr #Righ.tReceive, X: flags , * 
bclr #RigiitReceive, X: flags 



btst 
. IF 

move 
move 

-ELSE 

move 
move 
.ENDI 



S 2 2 , y : analogin 
<CC:> 

x: DRX_BUFF_BASE, xO 
X: DRX_BUFF_BASE+1 , xl 

X : ARX_BUFF_BASE , xO 
X:ARX BUFF BASE + l,xl 



; receive left 
; receive right 

; receive left 
; receive right 



; store unprocessed (with volume) output first 

move y : avolume , yO 

itipyr yO , xO , a 

mpyr yO,xl,b 

; MM 5/20/99 Swapped channels 

tfr xO,a a,x:TX_BUFF_BASE+2 /transmit 

tfr xl,b b,x:TX_BUFF_BASE /transmit 



left 
right 



; write input into delay line 





move 


#DElAYIiEN-l , mO 




move 


#DEIAYI.EN-l,ml 




move 


X:dpleft,rO 




move 


x:dpright,rl 




move 


y:delayval,yO 




move 


#>DELAYLEN,xO 




mpy 


xO,yO,a a,x:(rO)- 




move 


b,x: (rl) - 




move 


a, no 




move 


a, nl 




move 


X: (rO+nO) , a 




move 


X: (rl+nl) ,b 




move 


#-l,mO 




move 


#-l,ral 




move 


rO,x:dplef t 




move 


rl,x:dpright 




JSR 


STEREO_PROCESS 




; MM 


5/20/99 Swapped channels 




move 


b , X : TX_BUFF_BASE+1 




move 


a , X : TX_BUFF_BASE+3 




move 


#>l,xO 




move 


X : E cnt , a 




add 


xO,a 




move 


al,x:Bcnt 




jmp 


LOOP 



; transmit left 
; transmit right 



don ' t saturate 



Subrout ine s 
STEREO PROCESS 



move a, X; left 

move b , X : right 

; copy parameters from left channel EQs to right channel EQs 
GOPy_SH_PARAM Ih, IR 
C0PY_SH_PAEA1<1 2L, 2R 

COPY_PEQ_PARAM IL, IR 

COPY_PEQ_PARAM 21., 2 R 

COPY_PEQ_PARAM 3L, 3R 

COPY_PEQ_PARAM 4L, 4R 

COPY_PEQ_PARAM SL, 5R 

COPY_PBQ_PARAM 6L, 6R 

COPY_PEQ_PARAM 7L,,7R 
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COPY_PEQ_PARAM NT1L,NT1R 
CO P Y_P EQ_P ARAM NT2 L , NT2 R 
COPY_PEQ_PARAM NT3L , HT3 R 



COPY_HP_PAEAM 
COPY_LP_PARAM 
COPY LP PARAM 



hplef t, hpright 
Iplef t, Ipright 
Iplef t2 , lpright2 



COPy_AP_PAEAM aplef t , apright 

; HDCD processing 

jset #22,y:hdcdbp,doeq 



move 
move 
move 
move 



X: left, a 
X: right, b 

a, x:lterap 

b, x: rtemp 



clr b 

move 

move 

tst 

teg 

move 



#>l,xO 

y igainscalebp, a 
a 

xO,b 

bl, x:dcoiitrol 



3 sr 



HDCD DETECT 



destroy code 



move 

move 

cmp 

bne 

move 

move 

cmp 

bne 



#>3,xO 

x: rraodel , a 

xO , a 

skip_code_de s t 
#>8,xQ 
x:bitcntl , a 
xO, a 

skip_code_dest 



move 
eor 
move 
move 



X: 1 temp, a 
#>$000100,a 
a,x:ltemp 
a, x: left 



skip_code_dest : 



move 
move 
move 
jsr 



#-l,mO 
#-l,m4 
#4,n4 

HDCD DYNAMICS 



doeq: 



move 
move 
btst 

. IF <CC 

move 

move 

move 

move 
-ELSE 

move 
move 
.ENDI 

jmp 



x: Itemp, a 
x: rtemp, b 
#22,y:hdcdbp 

> 

a, x:left 

b, x: right 
X: detect, xO 
xO , X ; spixmit 

#0,xO 

xO, X: spixmit 
doeql 



move #0,xO 

move xO,X: spixmit 



doeql : 



jset #22,y:bypasB,dopostvol 



move 



x: Ieft,xl 



move x: right, yl 

move y :pref ader, xO 

nipyr -xO , xl , a 

mpyr -xO,yl,b 

tfr a,b b,x:righ.t 

; smiley face 

j set #BYPASS_LOSHSr,V, y :bypassmask, _skiplsl 
LSH IL 

_skiplsl 

j set #BYPASS_HISHEIiV, y :bypassmask, _Ekiphsl 
HSH 2L 

_skiphsl 

; cut-off response 

j set #BYPASS_HIPASS,y :bypassraask, _skiphpl 
HP hpleft 

_skiphpl 

j set #BYPASS_LOPASS , y : bypassctiask , _skiplpl 
LP Ipleft 

_Bkiplpl 

j set #BYPASS_NLOPASS, y : bypassmask, _skiplp21 
LP lpleft2 
_skiplp21 

; resonance EQ 

jset #BYPASS_IIOTCHl,y:bypassmask,_skipll 
PEQ IL 

_skipll 

j set #BYPASS_N0TCH2 ,y:bypasEmask,_skip21 
PEQ 21, 

_skip21 

j set #BYPASS_NOTCH3 , y ;bypassraask, _skip31 
PEQ 6L 

_skip3 1 

j set #BYPASS_N0TCH4 , y :bypassmask, _skip4l 

PEQ , 7L 

_skip41 

; cone-ciry 

j set #BYPASS_CONECRY, y : bypassmask, _skipccl 
PEQ SL 
PEQ 3L 
PEQ 4L 

_skipccl 

; double- tuned notch 

j set #BYPASS_DBNOTCH, y : bypassmask, _skipdbnl 
PEQ NTIL 
PEQ NT2L 
PEQ NT3L 

_Bkipdbnl 

; all-pass 

j set #BYPASS_ALLPASS, y: bypassmask, _skipapl 
AP apleft 

_skipapl 

move b,x:left 
move X : r ight , b 

; smiley face 

jset # BYPASS_LOSHELV , y : bypas sma s k , _skipl B r 
LSH IR 

_skiplsr 

j set #BYPASS_HISHELV, y : bypassmask, _skiphEr 
HSH 2R 

_skiphsr 

; cut-off response 

jset #BYPASS_HIPASS, y : bypassmask, _skiphpr 
HP hpright 

_skiphpr 

jset #BYPASS_LOPASS , y : bypassmask, _skiplpr 
LP Ipright 

_skiplpr 

j set #BYPASS_Nl,OPASS, y: bypas smask,_skiplp2r 
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LP lpright2 
_skiplp2r 

; resonance EQ 

j s e t B YPASS_NOTCHl , y : bypas smask,_skiplr 

PEQ IR 

_skiplir 

j set #BYPASS_NOTCK2 , y :bypassmask, _skip2r 
PEQ 2R 

_skip2r 

j s e t # B YPASS_NOTCH 3 , y : bypa ssmask,_skip3r 
PEQ 6R 

_skip3r 

j set ftBYPASS_N0TCH4 , y ibypassraask , _Ekip4r 
PEQ 7R 

_skip4r 

; cone -cry 

jset #BYPASS_CONECRY,y:bypassmask,_skipccr 
PEQ 5R 
PEQ 3R 
PEQ 4R 

_Ekipccr 

; double -tuned notch 

jset #BYPASS_DBNOTCH , y : bypassmask, _skipdbnr 

PEQ NTIR 
PEQ NT2R 
PEQ NT3R 

_skip<ibar 

; all-pass 

jset #BYPASS_ALLPASS,y:bypassmask,_skipapr 
AP apright 

Jsltipapr 

=j move b , X : r ight 

dopes tvol : 



plainvol : 



move y : volume , yO 

move x:left,xO 

move X : -r ight , xl 

mpyr -xO,yO,a 

mpyx -xl,yO,b 
rtB 



org xi : 



org yi : 



org p: 



m 
w 

m 
m 



o 

O 

o 



interrupts 



SHr/l2C receive ISR 



sh.i_rx_isr 

move 

move 

move 

move 

movep 

j set 



al , x: BhisaveAl 
xO,x:shisaveXO 
r4 , X : sh.iEaveR4 
n4,x: shisaveN4 

x:M_HRX,al 

#SPIStateBit , x : flags , _gotData 



; got index 

move al , X : indexData 

bset #SPIStateBit,x: flags 

jmp _exitlnt 

; got data 
_gotData : 

move X: indexData, n4 
move #pptrs , r4 



0135 
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bclr 

inovem 

move 



#SPIStateBit, jc: flags 
p: (r4+n4) , r4 
al,y: (r4) 



_exitlnt : 

move 
move 
move 
move 
rti 



X: BhisaveAl, al 
x:BhisaveXO,xO 
X: BhisaveR4 , r4 
X: shisaveN4,n4 



. SHI/I2C receive overrun error 

shi_rxe_isr 

movep x:M_HCSR,x:NADA 

movep X : M_HRX , x': NADA 

bset ifSPIOverrun,x: flags 

bclr #SPISCateBlt,x:f lags 

rti 



SHI Receive FIFO Full 
shi_rxf_isr 

movep X : M_HCSR , x : NADA 

movep X:M_HRX, X: NADA 

faset #SPrFIFOFull,x:f lags 

bclr #SPIStateBit,X:f lags 
rti 



SHI Transmit Data 
shi_txu_isr ;SHI Transmit Underrun Error 

bset #SPIUnderrun,x: flags 

movep X : M_HCS R , x : NADA 

movep X : spixrait , x : M_HTX 

bclr #SPIStateBit,x:flags 
rti 



shi_tx_isr : 

movep x: spixmit ,x:M_HTX 

bset #SPITransmit,x: flags 
rti 



;SHI Bus Error 
Bhi_bus_er-iror : 
movep 
; bset 



X : M_HCSR , X : HADA 
#SPIReoeive+4 , x: flags 



reset shi 



bclr 

nop 

nop 

bset 

bclr 

nop 

rti 



#0,X:M KCSR 



#0,X:M_HCSR 
#SPIStateBit,X: flags 



Subroutines 



inc lude ' i sr_dxg . asm ' 



Interrupt Service Routines 



esai_txe_Tar 
bclr 



esai_tx_isr 
j set 



#14,X:M SAISR 



#13,x:M SAISR, TxLeftSlot 



ESAI TRANSMIT ISR 

Read SAISR to clear transmit 

underrun error flag 



movep x:TX_BUFF_BASE+2,x:M_TXl ; write unprocessed data ^ j <-> 

movep X : TX_BUFF_BASE+3 , x : M_TXO U 1 3 O 

movep X:TX_BUFF_BASE + 3,X:M TX2 
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raovep 
rti 



X:TX_BUFF BASE+3,X:M TX3 



TxLeftSlot 



movep 
mo-vep 
movep 
movep 
rti 



X : TX_BUFF_BASE , X : M_TXL 
X : TX_BUFF_BASE+1 , x : K_TXO 
X : TX_BUFF_BASE+1 , x : M_TX2 
X:TX_BUFF_BASE+l,x:M TX3 



; write unprocessed data 



esai_txls_iEr 
move 
move 
move 

move 
rti 



rO,x: (rS) + 
#TX_BUFF_BASE, rO 
rO,x:TX_PTR 

X: - (r6) , rO 



ESAI TRANSMIT LAST SLOT ISR 
: Save rO to the stack 
: Reset pointer 

; Reset tx buffer pointer just in 
: case it was corrupted 
: Restore rO 



e s a i_rxe_i s r 
bclr 



#7,x:M SAISR 



overrun error flaa 



esax rx isr 



; ESAI RECEIVE ISR 

; Read SAISR to clear receive 

; overrun error flag 



j set 

bset 

movep 

movep 

rti 



# $ S , X : M_SAISR , Lef tSlot 
#Righ.tReceive, x: flags 
X : M_RXO , X : ARX_BUFF_BASE+ 1 
x:M_RXl,X:DRX BUFF BASE + 1 



if right channel data then set flag 



Lef tSlot 



movep 
movep 
rti 



X : M_RXO , X : ARX_BUFF_BASE 
X : M_RX1 , X : DRX_BUFF_BASE 



e s a i_rxl s_i s r 
move 
move 

move 
move 
rti 



rO,x: (rS) + 
#RX_BUFF_BASE,rO 

rO,x:RX_PTR 
X: - {r6) , rO 



ESAI RECEIVE LAST SLOT ISR 
; Save rO to the stack 

Reset rx buffer pointer just in 
; case it was corrupted 
; Update rx buffer pointer 
; Restore rO 



variable look up table 

pptrs 

dc volume 

dc sh_gamma_lL 

dc sh_k_lL 

dc sh_gamma_2L 

dc sh_k_2L 

dc pe(j_sratmiia_lL 

dc peq_beta_lL 

dc peq_k_lL 

dc peq_gamma_2L 

dc pec(_beta_2L 

dc peq_k_2L 

dc peq_gamma_3L 

dc peq_beta_3L 

dc peq_k_3L 

dc peq_gamma_4L 

dc peq_beta_4L 

dc peq_k_4L 

dc peq_garama_5L 

dc peq_beta_5L 

dc peq_>:_5L 

dc prefader 

dc bypass 

dc hp_scale_hpleft 

dc hp_fc_hpleft 

dc hp_qc_hpleft 
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dc lp_scale_lplef t 

dc lp_a2_lplefc 

dc lp_al_lpleft 

dc hdcdbp 

dc gainscalebp 

dc ddxcompbp 

dc peq_gamraa_6L 

dc peq;_beta_6Ii 

dc peq_k_6L 

dc peq_gamma_7Li 

dc peq_beta_71i 

dc peq_)c_7Ij 

dc analogin 

dc avolume 

dc bypassmask 

dc delayval 

dc ap_gattinia_aplef t 

dc ap_beta_aplef t 

dc lp_scale_lplef t2 

dc lp_a2_lplef t2 

dc lp_al_lpleft2 

dc Ip_b2_lpleft2 

dc lp_bl_lpleft2 

dc peq_gatnma_NTlL 

dc peq_beta_NTlL 

dc peq_k_NTlL 

dc pec[_gaiTima_NT2L 

dc peq_beta_NT2L 

dc peq__k_NT2L 

dc peq_gatrana_NT3 1. 

dc peq_beta_NT3L 

dc peq_k_NT3L 

dc YNADA 

dc YHADA 

dc YNADA 



ENDSEC 



end 



SH_SCALE_FACTOR EQU 3 

SH_SCA1.E_DIVIDE EQU ( 1<<SH_SCALE_FACT0R) 



k is gain 
k = 0 
0 < k < 1 
k = 1 
k =■ 1 



=> lo/hi pass filter 
= > cut 

=> pass- thru 
=> boost 



gamma drives critical frequency 



DECLARE LSH MACRO 



name , k, gamma 



org XI : 

Eh_x_\name dc 

sh_y_\nan\e dc 

org yi ; 

sh_gamraa_\name dc 
sh_minus_one_Sname dc 

sh__k_\name dc 

sh_l_\name dc 



x(n-l) 
y(n-l) 



gamma 
-1.0 

k/SH_SCALE_DIVIDE 
l./SH SCALE_DIVIDE 



ENDM 

DECIjARE_HSH: macro name, k, gamma 

DECIiARE_LSH name , k , gamma 
ENDM 



COPY SH PARAM 



MACRO 



from, to 



move 
move 
move 
move 

ENDM 



y : sh_gamraa_\ from, xO 
xO , y : sh_gamnia_\to 
y : sh_k_\ f r om , xO 
xO , y : sh_k_\to 



IKIT SH PARAM 



MACRO 



move #> (-1 . 0) , xO 

move xO , y : sh_minus_one_\name 

move #> (X . /SH_SCALE_DrVIDE) , xO 

move xO , y : sh_k_\name 

move xO , y : sh_l_\name 



EKDM 



input data is in xO 

input is scaled by 0.5 to prevent internal clipping in the all-pass 
computes all-pass: 

y(n} = - gamma * x(n) - x(n-l) - gamma * y(n-l) (lo-shelv) 
y(n) = gamma * xCn) + x(n-l) - gamma * y(n-l) (hi-shelv) 

all-pass output is scaled by gain: 

output = {(l+k)/2) * x{n) + ((l-k)/2) * y(n) 

as sumes : 

raO , m4 , m5 = - 1 
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LSH MACRO 



asr b 

rnd b 
move 

; compute y(n) 

rapy -xO,yO,b 

mac xl , yl , b 

macr -yO,xl,b 
; all-pass output in b 

tnpy xO , yO , b 

mac -yl,yO,b 

mac xO , yO , b 

mac yl,yO,b 

,- now scale output to get real result 

asl # { SH_SCALE_FACTOR) , b , b 

rnd b 



#sh._gamma_\name, r4 
ish._x_\n.ame , rO 
b.xO y: (r4) +,yO 

x:(rO)+,xl y:(r4)+,yl 
x: (rO) -,xl 

xO,x:(rO)+ y:(r4)+,y0 

now scale by gain/cut factor 
b,x: (rO) - b,yl 

y: (r4) +,yO 



ENDM 



HSH MACRO 



#sh_gamma_\name , r4 
#sli_x_\name , rO 
b,xO y: 



asr b 

rnd b 
move 

; compute y(n) 

mpy xO , yO , b 

mac -xl,yl,b 

macr -yO,xl,b 
; all -pass output in b 

mpy xO , yO , b 

mac -yl,yO,b 

mac xO , yO , b 

mac yl , yO , b 

; now scale output to get real result 

as 1 # ( SH_SCAI,E_PACTOR) , b , b 

rnd b 



y: (r4) +,yO 

x:(rO)+,xl y:(r4)+,yl 
x: (rO) - , xl 

X0,x:(r0)+ y:(r4)+,yO 
now scale by gain/cut factor 
b,X: (rO) - b,yl 

y: (r4) +,yO 



ENDM 



2 



0141) 



PEQ_SCALE_FACTOR EQU 3 

PEQ_SCALE_DIVIDE EQU ( 1«PEQ_SCALE_FACT0R) 



k is gain 
k = 0 
0 < k < 1 
k = a 
k > 1 



=> notch filter 
= > cut 

=> pass-thru 
=> boost 



gamma drives critical frequency 
beta defines Q 



DECXARE_PEQ MACRO 

org xi : 
peq_ji'_\name 

peq_x_\name 



name, k, gamma, beta 



dc 0 

dc 0 

dc 0 

dc 0 



org yi : 

Ps<3_9a™a_\name dc 

peq_beta_\name dc 

peq_k_\name dc 

peg_l_\name dc 

peg_v_\name dc 

peq_w_\name dc 

ENDM 

COPY_PEQ_PAPJ^ MACRO 



gamma 
beta 

k/PEQ_SCALE_DIVIDE 
1 . /PEQ_SCALE_DIVIDE 
0 
0 



from, to 



move 
move 
move 
move 
move 
move 

EHDM 



y : peq_gamma_\ from, xO 
xO , y :peq_gamma_\to 
y : peq_beta_\ from, xO 
xO , y : peq_beta_\ to 
y : peq_k_\ from, xO 
xO,y:peq_k_\to 



INIT_PEQ_PARAM MACRO 



name 



move #> ( 1 . /PEQ_SCALE_DIVIDE) , xO 
move xO , y : peq_k_\iiame 
move xO,y:peq_l_\name 



ENDM 



input data is in b 

input is scaled by 0,5 to prevent internal clipping in the all-pass 
computes all-pass: 

v(n) = gamma * y(n-l) + y{n-2) - gamma * v(n-l) 
w(n) = gamma * x(n-l) + x{n-2) - gamma * w(n-l) 
y(n) = w(n) + beta * x(n) - beta * v{n> 

all -pass output is scaled by gain: 

output = {(l+k)/2) * x(n) + ((l-k)/2) * y(n) 

assumes : 

mO,ra4,raS = -1 



1 



PEQ MACRO name 



^sr b #peq_y_\name,rO 




move #peq_gamma_\name , r4 




xaave #peq_v_\name, r5 




move 


b, xO 




move 


X: (rO) +, a 


y: (r4) + ,yO 


nvove 


X: (rO) +,xl 


y: (rS) +,yl 


; compute v(n) 






mac xl f yO , a 


X: (rO) +,b 




mac -yl,yO,a 


X: (rO) ,xl 


y : (rS) - , yl 


; compute wCn) , v{n3 


is now in a 




mac xl , yO , b 


a, xl 


a,y: trS) + 


mac ^yl f yO , b 


X; (rO) , a 


y : (r4) + , yO 


; compute y(n) , w(n) 


is now in b 




mac -xl,yO,b 


xO,x: (rO) - 


b,y: (rS) - 


mac xO , yO , b 


a,x: (rO) - 


y: (r4) +, yO 


; all-pass output in 


b, now scale by 


gain/cut factor 


mpy xO , yO , b 


X: (rO) -, a 


b,yl 


mac -yl , yO , b 




y: (r4) +,yO 


mac xO,yO,b 


a,x: (rO) + 




mac yl , yO , b 


yl,x: (rO) - 





; now scale output to get real result 
asl #(PEQ_SCAl,E_FACTOR) ,b,b 

rnd b 

ENDM 



2 
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LP_SCAIiE_FACTOR EQU 6 

LP_SCAIiE_DIVIDE EQU (1<<LP_SCALE_FACT0R) 



modified chamberlin lo-pass (both x<n) and x(n-l)) 
q also defines gain 

input is scaled to avoid internal clipping 
f = 2*sin(w/2) f only valid when less than 1. 
0 < q < 1 

implemented as a direct form biquad with coefficients and data scaled, 
needs headroom for gain 



DECLARE LP MACRO 



name , cal , ca2 , cb 



org xi : 



lp_w_\name 


ds 


2 


org yi : 






lp_scale_\name 


dc 


cb/16 


lp_a2_\ name 


dc 


ca2/2 


lp_al_\name 


dc 


cal/2 


lp_b2_\name 


dc 


0.0 


lp_bl_\name 


dc 


1.0/2 



ENDM 



COPY LP PARAM 



MACRO 



from, to 



move y: lp_scale_\from,xO 

move xO, y : lp_scale_\to 

move y : lp_a2_\f rem, xO 

move x0,y:lp_a2_\to 

move y:lp_al_\from, xO 

move xO,y:lp_al_\to 

move y:lp_b2_\from,x0 

move xO , y : lp_b2_\to 

move y : lp_bl_\ from, xO 

move XO , y : lp_bl_\ to 

ENDM 



INIT LP PARAM 



MACRO 



move 


#0,xO 


move 


xO, y : lp_b2_\ name 


move 


xO , y : lp_a2_\name 


move 


xO , y : lp_al_\name 


move 


xO , y : lp_bl_\name 


move 


#>(1./16.) ,xO 


move 


xO , y : lp_scale_\name 


EKDM 




INIT_LP2_ 


_PARAM MACRO name 



move 
move 
move 
move 
move 
move 
move 



#0,xO 

XO , y : lp_a2_\name 
xO , y ! lp_al_\narae 
#>0.5,x0 

xO , y : lp_b2_\narae 
#>1. ,xO 

xO, y : lp_bl_\name 



014^ 



1 



move #> (0. 25/16. ) ,xO 
move xO , y : lp_scale_\name 

ENDM 



assumes : 

TOO , m4 , tnS = - 1 



LP MACRO 



move 


b, xO 






ori 


#8,irj: 






move 


#lp_scale 


Sname, r4 




move 


#lp_w_\naTOe , r 0 




move 






y 


mpy 


xO , yO ,b 


X: (rO) +, xO 


y 


mac 


-xO,yO,b 


X: (rO) -,xl 


y 


tnacr 


-xl,yO,b 


xl, X: (rO) + 


y 


mac 


xO , yO , b 


b,x: (rO) - 


y 


macr 


xl , yO , b 






andi 


#$F7,mr 






asl 


#4,b,b 






ENDM 









I +,yO 



xO = x(n) , yO = 0.5 
xO = w(n-2) , yO = a2 
Xl = W{n-l) , yO = al 
w;n-2) = w(n-l), yO = 
w(n-l) = a, yO = bl 



b2 



2 
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HP_SCALE_FACTOR EQU S 

HP_SCALE_DIVIDE EQU (1<<HP_SCALE FACTOR) 



chaniberlin. hi-pass (from lopass) 
q also defines gain 

input is scaled to avoid internal clipping 
f = 2*sin{w/2) f only valid when less than 1. 
0 < g < 1 

implemented as a direct form biquad with coefficients and data scaled, 
needs headroom for gain 



DECLARE HP MACRO 



name , f c , qc , scale 



org XX: 
hp_s2_\name 
hp_y_\iiame 

org yi : 
hp_s cale_\name 
hp_f c_\name 
hp_gc_\name 

ENDM 



ds 1 
ds 1 



dc {-0.5*scale) 



dc f c 
dc gc 



copy HP PARAM 



MACRO 



from, to 



move 


y:hp_scale_\from, xO 




move 


xO , y : hp_scale_\ to 




move 


y ; hp_f c_\ from, xO 




move 


xO , y : hp_f c_\ to 




move 


y : hp_gc_\f rom, xO 




move 


xO , y : hp_qc_\ to 




ENDM 






as 


5sumes : 






mO , m4 , m5 = - 1 




MACRO 


name 




move 


#hp_scale_\name, r4 




move 


#lip_s2_\narae , r 0 




move 


b,xO 


y : (r4) +,yO 


; a = 


x(n> * scale 




mpy 


-yO,xO,a x;(rO)+,xl 


y: (r4) +,yO 


; b = 


s2(n-l) * fc 




mpyr 


x3.,y0,b x:{rO),xO 


y: (r4) +,yl 


; b = 


s2 (n-1) * fc + y(n-l) 




add 


xO,b 




; a = 


x(n> - s2(n-l) * fc - y(n-l) 




suh 


b,a b,x: (rO) 




; a = 


sl<n) = x(n) - s2(n-l} * fc - 


y(n-l) - qc 


macr 


-xl,yl,a xl,b 




move 


a,xO 




; b = 


s2<n) = s2(n-l) H- fc * sl(n) 




macr 


xO,yO,b x:(rO)-,xO 





; yO = scale 
; yO = fc 
; yl = gc 



1 



IF ®DEF ( ' LO ' ) 

tfr xO,b b,x:(rO) 

ELSE 

tfr a,b b,x: (rO) 

ENDIF 

asl b 
ENDM 
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2 



AP_SCALE_FACTOR EQU 3 

AP_SCALE_DIVrDE EQU (1<<AP_SCALE_FACT0R) 



gamma drives critical frequency- 
beta defines Q 



DECLARE AP MACRO 



name , gamma , beta 



org XI : 
ap_y_\name 



dc 
dc 
dc 
dc 



org yi : 

ap_gainma_\name dc gamma 

ap_beta_\name dc beta 

ap_v_\name dc 0 

ap_w_\name dc 0 

ENDM 



COPY AP PARAM 



MACRO 



from , to 



move y. ap_gatHma_\from,xO 

move xO , y : ap_gainma_\ to 

move y : ap_beta_\ from, xO 

move xO,y;ap_beta_\to 



INIT_AP_PARAM MACRO name 
EMDM 



input data is in b 

input is scaled by 0 . 5 to prevent internal clipping in the all-pass 
computes all-pass: 

v{n) = gamma * y(n-l) + y(n-2) - gamma * v(n-l) 
w(n) = gamma * x(n-l) + x(n-2) - gamma * w(n-l) 
y(n) = w(a) + beta * x(ii) - beta * v(n> 

assumes : 

m0,m4,m5 = -1 



AP MACRO name 



asr b 


#ap_y_\naine, rO 






move 


#ap_gamma_\name, r4 






move 


#ap_v 


_\name, r5 






move 




b,xO 






move 




X: (rO) +, a 


Y 


(r4) +,yO 


move 




X: (rO) +, XI 


Y 


(rS) +,yl 


; compute v(n) 










mac xl,yO,a 




X: (rO) + ,b 






mac -yl,yO, a 


X: (ro) ,xl 


Y 


(rS) - ,yl 


; compute w(n) , 


v(n) 


is now in a 






mac xl.yO.b 




a,xl 


a. 


y: {r5)+ 


mac -yl,yO,b 


X: (ro) , a 


y 


(r4) +,yO 


; compute y(n) , 


w(n) 


is now in b 






mac -xl,yO,b 


XO,X: (rO) - 


b,y: (r5) - 


mac xO,yO,b 




a,x-. (rO) - 







1 



rnd b x:(rO)-a b,yl 

" a,x: (rO) + 

yl,x: (rO) - 

ENDM 
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include 
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